NAME
WWW::Shorten::URLjr - Perl interface to URLjr.com
SYNOPSIS
use WWW::Shorten 'URLjr';
$short_url = makeashorterlink($long_url);
$long_url = makealongerlink($short_url);
$long_url = makealongerlink($nickname);DESCRIPTION
A Perl interface to the web site URLjr.com. URLjr.com simply maintains a database of long URLs, each of which has a unique identifier.
The function makeashorterlink will call the URLjr.com web site passing it your long URL and will return the shorter (URLjr) version.
The function makealongerlink does the reverse. makealongerlink will accept as an argument either the full URLjr URL or just the URLjr identifier/nickname.
If anything goes wrong, then either function will return undef.
Multiple submissions of the same URL will result in the same code being returned.
EXPORT
makeashorterlink, makealongerlink
SUPPORT, LICENCE, THANKS and SUCH
See the main WWW::Shorten docs.
AUTHOR
Iain Truskett <spoon@cpan.org>