1WWW::Shorten::Debli(3)User Contributed Perl DocumentationWWW::Shorten::Debli(3)
2
3
4
6 WWW::Shorten::Debli - Perl interface to deb.li
7
9 use WWW::Shorten 'Debli';
10
11 $short_url = makeashorterlink($long_url);
12
13 $long_url = makealongerlink($short_url);
14
16 A Perl interface to the web site <https://deb.li>. Deb.li provides a
17 URL shortening service primarily for Debian contributors.
18
20 makeashorterlink(URL)
21 The function "makeashorterlink" will connect to deb.li passing it
22 the URL and will return the shortened variant.
23
24 makealongerlink
25 The function "makealongerlink" does the reverse. It will accept as
26 an argument either the full deb.li URL or just the key.
27
28 If anything goes wrong, then either function will return "undef".
29
30 EXPORT
31 makeashorterlink, makealongerlink
32
34 Copyright (C) 2012 Damyan Ivanov dmn@debian.org
35
36 This program is free software; you can redistribute it and/or modify it
37 under the terms of the GNU General Public License as published by the
38 Free Software Foundation; either version 2, or (at your option) any
39 later version.
40
42 WWW::Shorten, <https://deb.li/>
43
44
45
46perl v5.36.0 2023-01-19 WWW::Shorten::Debli(3)