/ 
Net-Facebook-Oauth2-0.10
River stage one • 2 direct dependents • 2 total dependents
/ Net::Facebook::Oauth2

NAME

Net::Facebook::Oauth2 - a simple Perl wrapper around Facebook OAuth v2.0 protocol

SYNOPSIS

Somewhere in your application's login process:

use Net::Facebook::Oauth2;

my $fb = Net::Facebook::Oauth2->new(
    application_id     => 'your_application_id', 
    application_secret => 'your_application_secret',
    callback           => 'http://yourdomain.com/facebook/callback'
);

# get the authorization URL for your application
my $url = $fb->get_authorization_url(
    scope   => [ 'public_profile', 'email', 'user_posts', 'manage_pages' ],
    display => 'page'
);

Now redirect the user to this $url.

Once the user authorizes your application, Facebook will send him/her back to your application, on the callback link provided above.

Inside that callback route, use the verifier code parameter that Facebook sends to get the access token:

# param() below is a bogus function. Use whatever your web framework
# provides (e.g. $c->req->param('code'), $cgi->param('code'), etc)
my $code = param('code');

my $access_token = $fb->get_access_token(code => $code);

If you got so far, your user is logged! Save this access token in your database or session.

Later on you can use it to communicate with Facebook on behalf of this user:

my $fb = Net::Facebook::Oauth2->new(
    access_token => $access_token
);

my $info = $fb->get(
    'https://graph.facebook.com/v2.8/me'   # Facebook API URL
);

print $info->as_json;

DESCRIPTION

Net::Facebook::Oauth2 gives you a way to simply access FaceBook Oauth 2.0 protocol

For more information please see example folder shipped with this Module, or refer to the full documentation.

INSTALLATION

cpanm Net::Facebook::Oauth2

Or the old-fashioned manual way:

perl Makefile.PL
make
make test
make install

AUTHOR

Mahmoud A. Mehyar, <mamod.mehyar@gmail.com>

CONTRIBUTORS

Big Thanks To

COPYRIGHT AND LICENSE

Copyright (C) 2012-2016 by Mahmoud A. Mehyar

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.1 or, at your option, any later version of Perl 5 you may have available.