NAME
Net::Plurk::Dumper - Dump plurks
VERSION
Version 0.05
SYNOPSIS
use Net::Plurk::Dumper;
my $p = Net::Plurk::Dumper->new(
id => 'c9s'
);
my $plurks = $p->get_plurks;
for ( @$plurks ) {
use Data::Dumper::Simple;
warn Dumper( $_ );
}
DESCRIPTIONS
Net::Plurk::Dumper use JavaScript::SpiderMonkey ( spidermonkey library http://www.mozilla.org/js/spidermonkey/ ) to evaluate the plurk JS code (the JSON contains Date Object) , it should be invalid JSON. or we should call it JS not JSON.
so that you will need spidermoneky and JavaScript::SpiderMonkey installed to use this module.
Accessors
settings
FUNCTIONS
Net::Plurk::Dumper->new ( id => USERID )
LIST_REF get_self_plurks( HASHREF Arguments )
Arguments:
user_id 334195
user_ids [ 334195... ]
LIST_REF get_plurks( HASHREF Arguments )
Arguments:
user_id:
offset:
the returned LIST_REF contains HASH_REF
'plurk_type' => 2,
'lang' => 'tr_ch',
'content' =>
'plurk_id' => 53031904,
'responses_seen' => 0,
'no_comments' => 0,
'limited_to' => undef,
'content_raw' =>
'response_count' => 11,
'qualifier' => 'says',
'posted' => 'Sat, 23 May 2009 01:58:09 GMT',
'is_unread' => 0,
'user_id' => 3158365,
'owner_id' => 3158365,
'id' => 53031904
post ( HASHREF $args )
$args:
content: plurk content
lang: tr_ch , en ... etc (default is tr_ch)
no_comments: able to post comments (default is 0)
posted: timestamp , eg. "2009-5-28T08:27:05" (default is DateTime->now)
qualifier: qualifier (default is ':')
HASH_REF : get_responses ( STRING plurk_id )
HASH_REF:
friends: (HASH_REF)
key (userid)
'3393538' => {
'uid' => 3393538,
'avatar' => '3',
'id' => 3393538,
'nick_name' => 'miaoski',
'has_profile_image' => 1,
'display_name' => 'miaoski',
'gender' => 1
},
responses: (ARRAY_REF contains HASH_REF)
'lang' => 'tr_ch'
'content' => "\x{e5}\x{87}\x{8c}\x{e6}\x{99}\x{a8}\x{ef}\x{bc}\x{8c}\x{e7}\x{82}\x{b8}\x{e7}\x{89}\x{9b}\x{e8}\x{82}\x{89}\x{ef}\x{bc}\x{9f}\x{ef}\x{bc}\x{81}"
'plurk_id' => 53295424
'content_raw' => "\x{e5}\x{87}\x{8c}\x{e6}\x{99}\x{a8}\x{ef}\x{bc}\x{8c}\x{e7}\x{82}\x{b8}\x{e7}\x{89}\x{9b}\x{e8}\x{82}\x{89}\x{ef}\x{bc}\x{9f}\x{ef}\x{bc}\x{81}"
'qualifier' => ':'
'posted' => 'Sat, 23 May 2009 17:32:46 GMT'
'user_id' => 20998
'id' => 254582956
AUTHOR
Cornelius, <cornelius.howl at gmail.com>
BUGS
Please report any bugs or feature requests to bug-net-plurk-dumper at rt.cpan.org
, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Net-Plurk-Dumper. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Net::Plurk::Dumper
You can also look for information at:
RT: CPAN's request tracker
AnnoCPAN: Annotated CPAN documentation
CPAN Ratings
Search CPAN
ACKNOWLEDGEMENTS
COPYRIGHT & LICENSE
Copyright 2009 Cornelius, all rights reserved.
This program is released under the following license: Perl