I haven't used (or installed) Net::IRC, but from looking at the source presented at http://www.speakeasy.org/~cgires/trading/Net/Connection.pm, I assume that

$self->kick($channel, $nickname, $reason);
[download]

should do the trick. For commands not directly supported by Net::IRC, the sl command prints a raw string directly to the server - but you'll have to build the string with the command and the quoted text yourself then.

perl -MHTTP::Daemon -MHTTP::Response -MLWP::Simple -e ' ;    # The  
$d = new HTTP::Daemon and fork and getprint $d->url and exit;#spider
($c = $d->accept())->get_request(); $c->send_response( new   #in the
HTTP::Response(200,$_,$_,qq(Just another Perl hacker\n))); ' #  web
[download]

and how to get /whois $nick ?

i haven't found it in example that comes with Net::IRC module

well, by doing the same as Corion above and looking through the source (I haven't used or installed Net::IRC either), I would assume that

$self->whois($nick);
[download]

should do the trick

You might really want to read RFC 1459 ("The Internet Relay Chat Protocol"), as it details what should and shouldn't be done as a client. Another helpful resource might be http://www.irchelp.org/. The source code of Net::IRC should also prove a wealth of information, as most interesting commands (for a bot) should already have found their way into it - and, not really surprising, the names for the commands are the same as the commands in the clients, which are, even less surprisingly the same as the commands sent over to the server.

perl -MHTTP::Daemon -MHTTP::Response -MLWP::Simple -e ' ;    # The  
$d = new HTTP::Daemon and fork and getprint $d->url and exit;#spider
($c = $d->accept())->get_request(); $c->send_response( new   #in the
HTTP::Response(200,$_,$_,qq(Just another Perl hacker\n))); ' #  web
[download]

thnx for help! ;)