The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

WWW::Shorten::MahewinSexyUrl - Perl interface to msud.pl

SYNOPSIS

  use WWW::Shorten 'MahewinSexyUrl';

  my $long_url  = 'http://essai.fr';
  my $short_url = 'http://msud.pl/O0';

  my $short_url = makeashorterlink($long_url);
  my $long_url  = makealongerlink($short_url);

DESCRIPTION

A Perl interface to the web site msud.pl. MahewinSexyUrl simply maintains a database of long URLs, each of which has a unique identifier.

Functions

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

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

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

EXPORT

makeashorterlink, makealongerlink

SUPPORT, LICENCE, THANKS and SUCH

See the main WWW::Shorten docs.

AUTHOR

Natal Ngétal <hobbestig@cpan.org>

SEE ALSO

WWW::Shorten, perl, http://msud.pl/