NAME

ZenIRCBot - Perl API for ZenIRCBot

SYNOPSIS

  use ZenIRCBot;

  my $bot = ZenIRCBot->new();
  $bot->register_commands('ZenIRCBot::Test', [
      { name => 'foo', description => 'Returns bar' }
  ]);

  $bot->subscribe(sub {
      my ($msg, $channel) = @_;
      
      if ($msg->{version} == 1 and $msg->{type} eq 'privmsg') {
          if ($msg->{data}->{message} =~ m/foo/) {
              $bot->send_privmsg(
                  $msg->{data}->{channel},
                  sprintf("%s: bar", $msg->{data}->{sender})
              );
          }
      }
  });

  $bot->run;

DESCRIPTION

Perl API for ZenIRCBot.

METHODS

Standard API Methods

See the ZenIRCBot documentation for more information.

subscribe($func)

Set callback for redis publish events.

callback($message, $channel)

The callback function is called on Redis subscribe events, with the message hashref and channel name.

SEE ALSO

ZenIRCBot

ZenIRCBot Documentation

AUTHOR

Anthony Johnson <aj@ohess.org>