sub reload_module { undefSub("on_public"); delete $INC{"contrib.pl"}; require "contrib.pl"; } #### POE::Session->new ( _start => \&bot_start, irc_001 => \&on_connect, irc_public => \&on_public, irc_notice => \&on_notice, irc_msg => \&on_msg, ); #### $_[KERNEL]->post( $irc{server} => privmsg => $irc{chan}, "\0037 this is the standard test!");