### install ### $ cpanm AnyEvent::Campfire::Stream ### usage ### ```perl use AnyEvent::Campfire::Stream; my $stream = AnyEvent::Campfire::Stream->new( token => 'xxx', rooms => '1234', # hint: room id is in the url # seperated by comma `,` ); $stream->on('stream', sub { my ($s, $data) = @_; # $s is $stream # do something with $data print "$data->{id}: $data->{body}\n"; }); $stream->on('error', sub { my ($s, $error) = @_; # do something with $error print STDERR "$error\n"; }); ```