---
name: "WWW::Shorten::Shorl"
section: "3pm"
platform: "linux"
package: "libwww-shorten-perl"
version: "1.88-3"
release: "Debian 6.0 (Squeeze)"
platforms: ["linux"]
url: "https://new.carta.tech/WWW::Shorten::Shorl"
---

# WWW::Shorten::Shorl(3pm)

WWW::Shorten::Shorl - Perl interface to shorl.com

```
  use WWW::Shorten::Shorl;
```

```
  use WWW::Shorten 'Shorl';
```

```
  $short_url = makeashorterlink($long_url);
  ($short_url,$password) = makeashorterlink($long_url);
```

```
  $long_url  = makealongerlink($short_url);
```

A Perl interface to the web site shorl.com.  Shorl simply maintains a database of long URLs, each of which has a unique identifier. The function `"makeashorterlink"` will call the Shorl web site passing it your long URL and will return the shorter Shorl version. If used in a list context, then it will return both the Shorl URL and the password. The function `"makealongerlink"` does the reverse. `"makealongerlink"` will accept as an argument either the full Shorl URL or just the Shorl identifier. If anything goes wrong, then either function will return `"undef"`. Note that Shorl, unlike TinyURL and MakeAShorterLink, returns a unique code for every submission.\
 **EXPORT** makeashorterlink, makealongerlink See the main WWW::Shorten docs. Iain Truskett \<spoon@cpan.org\> Based on WWW::MakeAShorterLink by Dave Cross \<dave@dave.org.uk\> WWW::Shorten, perl, \<http://shorl.com/\>