WWW::Shorten::Googl - Perl interface to goo.gl
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 );
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.
The function makeashorterlink will call the Googl web site passing it your long URL and will return the shorter Googl version.
makeashorterlink
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.
The function makealongerlink does the reverse. makealongerlink will accept as an argument either the full goo.gl URL or just the goo.gl identifier.
makealongerlink
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.
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
makeashorterlink, makealongerlink
See the main WWW::Shorten docs.
Magnus Erixzon <magnus@erixzon.com>
WWW::Shorten, http://goo.gl/, http://code.google.com/apis/urlshortener/v1/reference.html#resource_url
To install WWW::Shorten::Googl, copy and paste the appropriate command in to your terminal.
cpanm
cpanm WWW::Shorten::Googl
CPAN shell
perl -MCPAN -e shell install WWW::Shorten::Googl
For more information on module installation, please visit the detailed CPAN module installation guide.