SYNOPSIS
use WWW::Shorten::OneShortLink;
use WWW::Shorten 'OneShortLink';
$short_url = makeashorterlink($long_url);
$long_url = makealongerlink($short_url);
DESCRIPTION
A Perl interface to the web site 1sl.net. OneShortLink simply maintains a database of long URLs, each of which has a unique identifier.The function "makeashorterlink" will call the OneShortLink web site passing it your long URL and will return the shorter OneShortLink version.
The function "makealongerlink" does the reverse. "makealongerlink" will accept as an argument either the full OneShortLink URL or just the OneShortLink identifier.
If anything goes wrong, then either function will return "undef".
EXPORT