NAME

Net::Google::Analytics::OAuth2 - OAuth2 for Google Analytics API

VERSION

version 3.03

SYNOPSIS

use Net::Google::Analytics;
use Net::Google::Analytics::OAuth2;

my $client_id     = "123456789012.apps.googleusercontent.com";
my $client_secret = "rAnDoMsEcReTrAnDoMsEcReT";
my $refresh_token = "RaNdOmSeCrEtRaNdOmSeCrEt";

my $analytics = Net::Google::Analytics->new;

# Authenticate
my $oauth = Net::Google::Analytics::OAuth2->new(
    client_id     => $client_id,
    client_secret => $client_secret,
);
my $token = $oauth->refresh_access_token($refresh_token);
$analytics->token($token);

DESCRIPTION

OAuth2 class for Net::Google::Analytics web service.

CONSTRUCTOR

new

my $oauth = Net::Google::Analytics::OAuth2->new(
    client_id     => $client_id,      # required
    client_secret => $client_secret,  # required
    redirect_uri  => $redirect_uri,
);

Create a new object. Use the client id and client secret from the Google APIs Console. $redirect_uri is optional and defaults to 'urn:ietf:wg:oauth:2.0:oob' for installed applications.

METHODS

authorize_url

my $url = $oauth->authorize_url(%extra_params);
my $url = $oauth->authorize_url(\%extra_params);

Returns a Google URL where the user can authenticate, authorize the application and retrieve an authorization code. %extra_params can be used to pass additional authorization parameters. See https://developers.google.com/accounts/docs/OAuth2WebServer#formingtheurl.

get_access_token

my $token = $oauth->get_access_token($code);

Retrieves an access token and a refresh token using an authorization code. Returns a hashref with the following entries:

access_token

refresh_token

expires_in

token_type

refresh_access_token

my $token = $oauth->refresh_access_token($refresh_token);

Retrieves a new access token using a refresh token. Returns a hashref with the following entries:

access_token

expires_in

token_type

interactive

$oauth->interactive;

Obtain and print an access and refresh token interactively using the console. The user is prompted to visit a Google URL and enter a code from that page.

AUTHOR

Nick Wellnhofer <wellnhofer@aevum.de>

COPYRIGHT AND LICENSE

This software is copyright (c) 2015 by Nick Wellnhofer.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.