NAME
WWW::Shorten::EkDk - Perl interface to add.redir.ek.dk
SYNOPSIS
use WWW::Shorten::EkDk;
use WWW::Shorten 'EkDk';
$short_url = makeashorterlink($long_url);
$long_url = makealongerlink($short_url);
DESCRIPTION
A Perl interface to the web site add.redir.ek.dk. EkDk simply maintains a database of long URLs, each of which has a unique identifier. The website permits you to specify an email address as well, but this API doesn't (yet).
The function makeashorterlink
will call the EkDk web site passing it your long URL and will return the shorter EkDk version. Unlike many of the other services, EkDk will return an error if the name has been previously defined, even if it was defined with the same URL.
The function makealongerlink
does the reverse. makealongerlink
will accept as an argument either the full EkDk URL or just the EkDk 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
AUTHOR
Iain Truskett <spoon@cpan.org>
Based on WWW::MakeAShorterLink by Dave Cross <dave@dave.org.uk>