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

NAME

WWW::Shorten::SmLnk - Perl interface to SmLnk.com

SYNOPSIS

  use WWW::Shorten::SmLnk;

  use WWW::Shorten 'SmLnk';

  $short_url = makeashorterlink($long_url);

  $long_url  = makealongerlink($short_url);

DESCRIPTION

A Perl interface to the web service SmLnk.com. SmLnk maintains a database of long URLs, each of which has a unique identifier or nickname.

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

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

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

EXPORT

makeashorterlink, makealongerlink

BUGS

Please report bugs at <bug-www-shorten@rt.cpan.org> or via the web interface at http://rt.cpan.org

THANKS

Jon and William (jon and wjr at smlnk.com respectively) for providing SmLnk.com.

AUTHOR

Iain Truskett <spoon@cpan.org>

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

SEE ALSO

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