#!/usr/bin/perl
use strict;
use warnings;

use Net::IRC;

my $irc = new Net::IRC;

my $conn = $irc->newconn(    Nick    => 'J-jayz-Z_perl',
               
 Server    => 'irc.bw-networx.net',
               
 Port    => 6667,
               
 Channel    => '#newbies',
               
 Ircname    => 'Kein Kommentar');

$irc->start;