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 );
}