Bot IRC written in Perl