This script should connect to the server and join the channel '#Alex', well it doesnt , can someone try and explain to me why?
The output i get is:
connected
registered
and thats all.
use Data::Dumper; use POE::Kernel; use POE::Session; use POE::Component::IRC; sub start { my ($kernel, $session) = @_[KERNEL, SESSION]; $kernel->post( 'test', 'connect', { Debug => 1, Nick => 'Bot', Server => 'administrator.co.il', Port => '6667', Username => 'BotV6-Poe', Ircname => 'ModHelp', } )and print("connected\n"); $kernel->post( 'test', 'register', 'all')and print("registered\n"); } sub stop { my ($kernel) = $_[KERNEL]; $kernel->call( 'test', 'quit', 'Neenios on ice!' ); } sub on_connect { print("in on_Connect\n"); my ($kernel) = $_[KERNEL]; $kernel->post( 'test', 'join', '#Alex' )and print("Joined\n"); } sub on_msg { my @args = @_[ ARG0 .. $#_ ]; my $list=join(" . ",@args); $kernel->post('test','privmsg','Isa',@_[ARG0]); } POE::Component::IRC->new('test'); POE::Session->create(inline_states =>{ _start=>\&start, _stop=>\&stop, irc_001=>\&on_connect, irc_msg=>\&on_msg,},); $poe_kernel->run();
In reply to POE::IRC Not joining Channel by kosh
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |