/ 
Adam-1.001
River stage zero No dependents
/ Moses::Declare

NAME

Moses::Declare - MooseX::Declare syntax for Moses bots

VERSION

version 1.001

SYNOPSIS

use Moses::Declare;

bot MasterMold {
  server 'irc.perl.org';
  channels '#moses';

  has message => (
    isa     => 'Str',
    is      => 'ro',
    default => 'Mutant Detected!',
  );

  on irc_bot_addressed( Str $nickstr, ArrayRef $channels, Str $message) {
    my ($nick) = split /!/, $nickstr;
    $self->privmsg( $channels => "$nick: ${ \$self->message }" );
  };
}

my @bots = map { MasterMold->new( nickname => "Sentinel_${_}" ) } ( 1 .. 2 );

POE::Kernel->run;

SUPPORT

Issues

Please report bugs and feature requests on GitHub at https://github.com/perigrin/adam-bot-framework/issues.

IRC

Join #ai on irc.perl.org or message Getty directly.

CONTRIBUTING

Contributions are welcome! Please fork the repository and submit a pull request.

AUTHORS

  • Chris Prather <chris@prather.org>

  • Torsten Raudssus <torsten@raudssus.de>

COPYRIGHT AND LICENSE

This software is copyright (c) 2010 by Chris Prather, Torsten Raudssus.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.