added hiii to colorize ii

bin/hiii

@@ -0,0 +1,87 @@
+#!/usr/bin/perl
+
+use v5.10;
+use strict;
+use warnings;
+
+my %config = (
+	# You can specify multiple nicknames like, 'berk|bozbalci'. All will be highlighted.
+
+	'nick' => 'mort', 
+	'color_nicks' => 'yellow',
+	'color_own_nick' => 'light_red',
+	'color_url' => 'light_blue',
+	'color_actions' => 'magenta',
+	'color_server' => 'black',
+	'color_time' => 'light_green'
+);
+
+my %color = (
+	'black' => "",
+	'red' => "",
+	'green' => "",
+	'yellow' => "",
+	'blue' => "",
+	'magenta' => "",
+	'cyan' => "",
+	'white' => "",
+	'light_black' => "",
+	'light_red' => "",
+	'light_green' => "",
+	'light_yellow' => "",
+	'light_blue' => "",
+	'light_magenta' => "",
+	'light_cyan' => "",
+	'light_white' => "",
+	'reset' => ""
+);
+
+my $date = "[0-9]{4}-[0-9]{2}-[0-9]{2}";
+my $time = "([0-9]{2}:[0-9]{2})";
+my $url = "(((https?|ftp)|mailto):(//)?[^ <>\"[:blank:]]*|(www|ftp)[0-9]?\.[-a-z0-9.]+)";
+my $nick = "<(.*?)>";
+my $action = "
ACTION (.*)
?";
+my $useless = "^-!- (.*)";
+
+while (<>) {
+	# Remove the huge date from the line's beginning
+	s/^$date //;
+
+	# Highlight time
+	s/$time /$color{$config{'color_time'}} $1 $color{'reset'}/;
+
+	# Highlight nicknames, remove <> around them
+	s/$nick/$color{$config{'color_nicks'}}$1$color{'reset'} /;
+
+	# Highlight me
+	s/($config{'nick'})/$color{$config{'color_own_nick'}}$1$color{'reset'}/;
+
+	# Highlight URLs
+	s/$url/$color{$config{'color_url'}}$1$color{'reset'}/;
+
+	# Highlight /me actions
+	s/$action/$color{$config{'color_actions'}}* $1 *$color{'reset'}/;
+
+	# Highlight "has joined", "changed mode", etc.
+	s/^$useless/$color{$config{'color_server'}}$1$color{'reset'}/;
+
+	# The ^C[color] color sequences:
+	s/\cC0(.*)(\cC)?/$color{'white'}$1$color{'reset'}/;
+	s/\cC1(.*)(\cC)?/$color{'black'}$1$color{'reset'}/;
+	s/\cC2(.*)(\cC)?/$color{'blue'}$1$color{'reset'}/;
+	s/\cC3(.*)(\cC)?/$color{'green'}$1$color{'reset'}/;
+	s/\cC4(.*)(\cC)?/$color{'light_red'}$1$color{'reset'}/;
+	s/\cC5(.*)(\cC)?/$color{'red'}$1$color{'reset'}/;
+	s/\cC6(.*)(\cC)?/$color{'magenta'}$1$color{'reset'}/;
+	s/\cC7(.*)(\cC)?/$color{'light_yellow'}$1$color{'reset'}/;
+	s/\cC8(.*)(\cC)?/$color{'yellow'}$1$color{'reset'}/;
+	s/\cC9(.*)(\cC)?/$color{'light_green'}$1$color{'reset'}/;
+	s/\cC10(.*)(\cC)?/$color{'cyan'}$1$color{'reset'}/;
+	s/\cC11(.*)(\cC)?/$color{'light_cyan'}$1$color{'reset'}/;
+	s/\cC12(.*)(\cC)?/$color{'light_blue'}$1$color{'reset'}/;
+	s/\cC13(.*)(\cC)?/$color{'light_magenta'}$1$color{'reset'}/;
+	s/\cC14(.*)(\cC)?/$color{'black'}$1$color{'reset'}/;
+	s/\cC15(.*)(\cC)?/$color{'light_black'}$1$color{'reset'}/;
+
+	print;
+}