use Net::IRC;

$irc = new Net::IRC;
$conn = $irc->newconn(Nick    => 'some_nick',
                      Server  => 'some.irc.server.com',
                      Port    =>  6667,
                      Ircname => 'Some witty comment.');
$irc->start;