# Linkedin-OAuth2 An easy way to authenticate users via LinkedIn using Perl5 NAME Linkedin::OAuth2 - An easy way to authenticate users via LinkedIn. VERSION version 0.2 SYNOPSIS my $linkedin = Linkedin::OAuth2->new( key => 'your-app-key', secret => 'your-app-secret'); # here is an entire login logic or recipe: my $linkedin = Linkedin::OAuth2->new( key => 'your-app-key',secret => 'your-app-secret'); # catch the code param and try to convert it into an access_token and get the email address ``` if (param('code')) { my $token_object = $linkedin->get_access_token( authorization_code => param('code'), redirect_uri => 'your-app-redirect-uri-or-callback-url' ); my $result = $linkedin->request( url => 'https://api.linkedin.com/v1/people/~:(id,formatted-name,picture-url,email-address)?format=json', token => $token_object->{access_token} ); if ($result->{emailAddress}) { # we have the email address, authenticate the user and redirect somewhere.. # .... return; } else { # we did not get an email address # redirect to try again? return; } } # get the url for permissions my $authorization_code_url = $linkedin->authorization_code_url( # this field is required redirect_uri => 'your-app-redirect', #array of permissions that your app requires, see http://developer.linkedin.com/documents/authentication#granting for more details, this field is optional scope => ['r_basicprofile','rw_groups','r_emailaddress'] ); #redirect the user to get their permission redirect($authorization_code_url); # and catch an error back from linked in if (param('error')) { # handle the error # if the user denied, redirect to try again... } ``` SEE ALSO http://developer.linkedin.com/documents AUTHOR Asaf Klibansky