NAME
POEIKC::Plugin::IRC::ClientLite - Synchronous interface
SYNOPSIS
use Data::Dumper;
use POEIKC::Plugin::IRC::ClientLite;
my $irc = POEIKC::Plugin::IRC::ClientLite->new(
ip => irc_bot_host_name,
port => 47301,
timeout => 3,
RaiseError => 1,
);
eval {
$irc->connect;
my $re = $irc->privmsg(
{
"channel"=>"#test",
"connect"=>{
"Nick"=>"poeN",
"Username"=>"poeU",
"debug"=>1,
"Port"=>6667,
"flood"=>1,
"Ircname"=>"localhost"
}
},
'AIUEO','IRoHaNiHoHeTo'
);
$re or die "failed in enqueue";
};if($@){
warn $@;
}AUTHOR
Yuji Suzuki <yujisuzuki@mail.arbolbell.jp>
LICENSE
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.