The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

WWW::Shorten::Metamark - Perl interface to metamark.net

SYNOPSIS

  use WWW::Shorten::Metamark;

  use WWW::Shorten 'Metamark';

  $short_url = makeashorterlink($long_url);

  $long_url  = makealongerlink($short_url);

DESCRIPTION

A Perl interface to the web site metamark.net. Metamark simply maintains a database of long URLs, each of which has a unique identifier.

Functions

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

The function makealongerlink does the reverse. makealongerlink will accept as an argument either the full Metamark URL or just the Metamark 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

Iain Truskett <spoon@cpan.org>

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

SEE ALSO

WWW::Shorten, perl, http://metamark.net/