WWW::Shorten::Googl(3p)

NAME
WWW::Shorten::Googl - Perl interface to goo.gl

SYNOPSIS
  use WWW::Shorten::Googl;
  use WWW::Shorten 'Googl';

  $short_url = makeashorterlink($long_url);

  $long_url  = makealongerlink($short_url);

  # Note - this function is specific to the Googl shortener
  $stats = getlinkstats( $short_url );

DESCRIPTION
A Perl interface to the goo.gl URL shortening service. Googl simply maintains a database of long URLs, each of which has a unique identifier.

Functions

  makeashorterlink
The function "makeashorterlink" will call the Googl web site passing it your long URL and will return the shorter Googl version.

If you provide your Google username and password, the link will be added to your list of shortened URLs at <http://goo.gl/>. See AUTHENTICATION for details.

  makealongerlink
The function "makealongerlink" does the reverse. "makealongerlink" will accept as an argument either the full goo.gl URL or just the goo.gl identifier.

  getlinkstats
Given a goo.gl URL, returns a hash ref with statistics about the URL.

See <http://code.google.com/apis/urlshortener/v1/reference.html#resource_url> for information on which data can be present in this hash ref.

AUTHENTICATION
If you provide your Google username and password, all shortened URLs will be available for viewing at <http://goo.gl/>

You provide these details by setting the environment variables GOOGLE_USERNAME and GOOGLE_PASSWORD, such as

 GOOGLE_USERNAME=your.username@gmail.com
 GOOGLE_PASSWORD=somethingVerySecret

EXPORT
makeashorterlink, makealongerlink

SUPPORT, LICENCE, THANKS and SUCH
See the main WWW::Shorten docs.

AUTHOR
Magnus Erixzon <magnus@erixzon.com>

SEE ALSO
WWW::Shorten, <http://goo.gl/>, <http://code.google.com/apis/urlshortener/v1/reference.html#resource_url>