The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

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.

SEE ALSO

poeikcd POEIKC::Plugin::IRC