WWW::RenRen
Aaron Lewis <the.warl0ck.1989@gmail.com> Copyright 2012 Release under GPLv3 License
Simulate browser to complete all kinds of request of renren.com, popular social website in China Note from author: Everything is transmitted as clear text, fuck renren.com, they never took my advice, so use it at your own risk.
use WWW::RenRen; my $rr = RenRen->new; die unless $rr->login ('XX@yy.com', 'your_password'); # or use user id
Create a new object and return, my $rr = RenRen->new;
Login can be done with either your mail address or associated jabber ID, nothing could be done before login. $rr->login ('XX@yy.com', 'password');
Post a new status, note: your perl script must be utf8 encoded. Optional encoding support coming soon. $rr->postNewStatus ('message_will_be_decoded_with_utf8');
Delete an album, required album ID plus a capcha code: $rr->deleteAlbum ('albumid', 'capcha');
Create a new album, with password protection: $rr->createAlbum ('album_name', 'password'); Or being open to all: $rr->createAlbum ('album_name'); If succeed, return value would be the album id of newly created one.
Delete a posted status, $rr->delMyDoing ('doing_id')
Delete a shared item, $rr->delShare ('shareid')
Add a friend to your list, user id must be number value $rr->addThisFriend ('user_id');
Upload photos (at most 5) to a known album, $rr->uploadNewPhoto ('album_id', ['1.png', '2.png']);
Post a new blog entry, feature under testing $rr->postNewEntry ('title', 'content', 'password_optional', 'category_id_optional');
Retrieve list of friend ids my @list = $rr->getFriendIDList();
Access home page of any user, use opensearch by default: $rr->accessHomePage ('123456');
Unlock your renren.com account, $rr->relieve ('your renren.com account', 'password');
To install RenRen, copy and paste the appropriate command in to your terminal.
cpanm
cpanm RenRen
CPAN shell
perl -MCPAN -e shell install RenRen
For more information on module installation, please visit the detailed CPAN module installation guide.