strict;
use 5.008_001;
our $VERSION = '0.05';
use AnyEvent;
use AnyEvent::HTTP;
use Encode;
use JSON;
use MIME::Base64;
use Scalar::Util;
use URI;
use URI::QueryParam;
sub new {
my($class, %arg
_poll->() unless $body;
my $res = eval { JSON::decode_json($body) } || do {
($args{on_error} || sub { die @_ })->("JSON parsing error: $@");
return;
ent::FriendFeed::Realtime is an AnyEvent consumer that subscribes
to FriendFeed Real-time API via JSON long-poll.
=head1 AUTHOR
Tatsuhiko Miyagawa E<lt>miyagawa@bulknews.netE<gt>
=head1 LICENSE
Th