POE::Component::Server::IRC::Plugin
うーん。
POE::Component::Server::IRC::Pluginを使用して、POE::Component::Server::IRC->_daemon_cmd_messageこの辺りをいじれる実装はどうやるのだろうか。
_defaultをみる限りイベントが発生しないんだよね。なんか、触るところ間違ってるのかな。発言イベントをとりたいだけなんだけど。
直接触るか...orz...
package POE::Component::Server::MyIRC use base qw/POE::Component::Server::IRC/; sub _daemon_cmd_message { my $self = shift; my $nick = shift || return; my $type = shift || return; my @args = @_ ; # do something $self->SUPER::_daemon_cmd_message( $nick , $type , @args ); }