Skip to content

Latest commit

 

History

History
102 lines (72 loc) · 3.41 KB

README.md

File metadata and controls

102 lines (72 loc) · 3.41 KB

NAME

WWW::LinkedIn - Simple interface to the LinkedIn OAuth API

SYNOPSIS

Step 1

Get the Request Token and Request Token Secret

<%
  use WWW::LinkedIn;
  my $li = WWW::LinkedIn->new(
    consumer_key    => $consumer_key,     # Your 'API Key'
    consumer_secret => $consumer_secret,  # Your 'Secret Key'
  );
  my $token = $li->get_request_token(
    callback  => "http://www.example.com/v1/login/linkedin/"
  );
  
  # Save $token->{token} and $token->{secret} for later:
  $Session->{request_token} = $token->{token};
  $Session->{request_token_secret} = $token->{secret};
%>

<!-- User must click on this link, login and "Authorize" your app to have access: -->
<a href="<%= $token->{url} %>">Login to LinkedIn</a>

Step 2

After the user has authorized your app to have access to their account, they will be redirected to the URL you specified in the callback parameter from Step 1.

The URL will be given the parameter oauth_verifier which you will need.

Perform the following in the URL that they are redirected to:

use WWW::LinkedIn;

my $li = WWW::LinkedIn->new(
  consumer_key          => $consumer_key,
  consumer_secret       => $consumer_secret,
);
my $access_token = $li->get_access_token(
  verifier              => $Form->{oauth_verifier}, # <--- This is passed to us in the querystring:
  request_token         => $Session->{request_token}, # <--- From step 1.
  request_token_secret  => $Session->{request_token_secret}, # <--- From step 1.
);

Step 3

Now you can use the request method to make 'protected resource' requests like this:

# Get the user's own profile:
my $profile_xml = $li->request(
  request_url         => 'https://api.linkedin.com/v1/people/~:(id,first-name,last-name,headline)',
  access_token        => $access_token->{token},
  access_token_secret => $access_token->{secret},
);

Returns something like this:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<person>
  <id>XnMs6jaRm6</id>
  <first-name>John</first-name>
  <last-name>Drago</last-name>
  <headline>Master Hackologist</headline>
</person>

# Get a specific user's profile:
my $profile_xml = $li->request(
  request_url         => 'https://api.linkedin.com/v1/people/id=XnMs6jaRm6:(id,first-name,last-name,headline)',
  access_token        => $access_token->{token},
  access_token_secret => $access_token->{secret},
);

DESCRIPTION

This module provides a simple interface to the LinkedIn OAuth API.

The documentation on LinkedIn's website was unclear and required a couple days of trial-and-error to make it all work.

ACKNOWLEDGEMENTS

Special thanks to:

AUTHOR

John Drago <jdrago.999 at gmail.com>

Copyright 2011 - All rights reserved.

LICENSE

This software is Free software and may be used and redistributed under the same terms as any version of perl itself.