Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- use WWW::Facebook::API;
- use Data::Dumper;
- my $client = WWW::Facebook::API->new(
- desktop => 1,
- api_key => 'api.key',
- secret => 'api.secret',
- );
- $client->auth->get_session;
- my $friends_perl = $client->friends->get;
- print Dumper $friends_perl;
- my $notifications_perl = $client->notifications->get;
- print Dumper $notifications_perl;
- my $quotes_perl = $client->users->get_info(
- uids => $friends_perl,
- fields => ['quotes']
- );
- print Dumper $quotes_perl;
- $client->auth->logout;
Add Comment
Please, Sign In to add comment