1WWW::Shorten::TinyURL(3U)ser Contributed Perl DocumentatiWoWnW::Shorten::TinyURL(3)
2
3
4
6 WWW::Shorten::TinyURL - Perl interface to <https://tinyurl.com>
7
9 use strict;
10 use warnings;
11
12 use WWW::Shorten::TinyURL;
13 use WWW::Shorten 'TinyURL';
14
15 my $short_url = makeashorterlink('https://www.foo.com/some/long/url');
16 my $long_url = makealongerlink($short_url);
17
19 A Perl interface to the web site <https://tinyurl.com>. The service
20 simply maintains a database of long URLs, each of which has a unique
21 identifier.
22
24 makeashorterlink
25 The function "makeashorterlink" will call the <https://TinyURL.com> web
26 site passing it your long URL and will return the shorter version.
27
28 makealongerlink
29 The function "makealongerlink" does the reverse. "makealongerlink" will
30 accept as an argument either the full URL or just the identifier.
31
32 If anything goes wrong, then either function will return "undef".
33
34 EXPORT
35 makeashorterlink, makealongerlink
36
38 See the main WWW::Shorten docs.
39
41 Iain Truskett <spoon@cpan.org>
42
44 WWW::Shorten, <https://tinyurl.com/>
45
46
47
48perl v5.38.0 2023-07-21 WWW::Shorten::TinyURL(3)