The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
WWW-Shorten-1.2
River stage two • 41 direct dependents • 55 total dependents
1 ++
/ WWW::Shorten::Shorl

NAME

WWW::Shorten::Shorl - Perl interface to shorl.com

SYNOPSIS

  use WWW::Shorten::Shorl;

  use WWW::Shorten 'Shorl';

  $short_url = makeashorterlink($long_url);

  $long_url  = makealongerlink($short_url);

DESCRIPTION

A Perl interface to the web site shorl.com. Shorl simply maintains a database of long URLs, each of which has a unique identifier.

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

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

If anything goes wrong, then either function will return undef.

Note that Shorl, unlike TinyURL and MakeAShorterLink, returns a unique code for every submission.

EXPORT

makeashorterlink, makealongerlink

TODO

  • Return the password somehow.

AUTHOR

Iain Truskett <spoon@cpan.org>

Based on WWW::MakeAShorteRLink by Dave Cross <dave@dave.org.uk>

SEE ALSO

WWW::Shorten, perl, http://shorl.com/