NAME
AnySan - ANY mesSaging protocol hANdler
SYNOPSIS
# echo bot
use AnySan;
use AnySan::Provider::IRC;
my $irc = irc
'chat.example.net',
key => 'example1',
nickname => 'AnySan1',
channels => {
'#anysan1' => {},
'#anysan2' => {},
};
AnySan->register_listener(
echo => {
cb => sub {
my $receive = shift;
return unless $receive->message =~ /^!yappo/;
$receive->send_replay($receive->message);
}
}
);
AnySan->run;
DESCRIPTION
AnySan is AnyEvent based some messaging protocol handling program tool kit.
AUTHOR
Kazuhiro Osawa <yappo <at> shibuya <döt> pl>
SEE ALSO
LICENSE
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.