Irc Bot for IRC2P in Perl