A simple IRC bot written in Perl