I am trying to connect to LinkedIn using LWP::Authen::OAuth2. Authorisation goes fine but when I come to exchange the authorisation token for an access token, I get this error: 

Endpoint: https://api.linkedin.com/v2/accessToken
JSON:
{
  "serviceErrorCode":65604,
  "message":"Empty oauth2 access token",
  "status":401
}

[download]
That doesn't seem to make alot of sense to me as I would expect the OAuth2 Access Token to be empty in a request to get it!

This is the bare bones of what I am doing... 

my $linkedin = LWP::Authen::OAuth2->new(
    client_id                => 'xxxxxxx',
    client_secret            => 'xxxxxxx',
    authorization_endpoint   => 'https://api.linkedin.com/uas/oauth2/a
+uthorization',
    token_endpoint           => 'https://api.linkedin.com/v2/accessTok
+en',
    redirect_uri             => "https://$ENV{'HTTP_HOST'}/cgi-bin/pos
+tdog.pl?command=authorize_linkedin",
    scope                    => 'w_member_social',
    save_tokens              => \&save_linkedin_token,
);

#########################
# LinkedIn button clicked
sub linkedin {
    my $auth_url = $linkedin->authorization_url;
    print "Location: $auth_url\n\n";
    exit 0;
}

[download]
The code above behaves as expected by going off to LinkedIn, authorising the app and calling the callback URL.
The callback URL does this: 
sub authorize_linkedin {
    my $token = $linkedin->request_tokens(
        code  => $data{'code'},
    );
    print "Content-type: text-plain\n\n";
    print "ERROR: $data{'error'}\n\nMessage: $data{'error_description'
+}\n\n";
    print "TOKEN: $token\n";
    print $data{'code'};
    exit 0;
}

[download]
The error (above) is generated at the request_tokens call. $data{'code'} contains the code passed as a query parameter to the callback URL.

I feel I must be missing something obvious here...

In reply to Obtaining OAuth2 Access Token by Bod

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.