install

$ cpanm AnyEvent::Campfire::Client    # not yet working

usage

```perl use AnyEvent::Campfire::Client; my $client = AnyEvent::Campfire::Client->new( token => 'xxxx', rooms => '1234', account => 'p5-hubot', );

$client->on( 'join', sub { my ($e, $data) = @; # $e is event emitter. please ignore it. $client->speak($data->{roomid}, "hi"); } );

$client->on( 'message', sub { my ($e, $data) = @_; # ... } );

want to exit?

$client->exit; ```