Create IRC Perl Bot