| Name : perl-WWW-Shorten-Simple
| |
| Version : 0.02
| Vendor : obs://build_opensuse_org/devel:languages:perl
|
| Release : 1.65
| Date : 2024-08-05 19:48:44
|
| Group : Development/Libraries/Perl
| Source RPM : perl-WWW-Shorten-Simple-0.02-1.65.src.rpm
|
| Size : 0.02 MB
| |
| Packager : (none)
| |
| Summary : Factory wrapper around WWW::Shorten to avoid imports
|
Description :
WWW::Shorten::Simple is a wrapper (factory) around WWW::Shorten so that you
can create an object representing each URL shortening service, instead of
_import_ing \'makeashorterlink\' function into your namespace.
This allows you to call multiple URL shortening services in one package,
for instance to call WWW::Shorten::RevCanonical to extract rev=\"canonical\",
fallback to bit.ly if username and API key are present, and then finally to
TinyURL.
use WWW::Shorten::Simple;
my AATTshorteners = (
WWW::Shorten::Simple->new(\'RevCanonical\'),
WWW::Shorten::Simple->new(\'Bitly\', $bitly_username, $bitly_api_key),
WWW::Shorten::Simple->new(\'TinyURL\'),
);
my $short_url;
for my $shortener (AATTshorteners) {
$short_url = eval { $shortener->shorten($long_url) } # eval to ignore errors
and last;
}
This wrapper works with most WWW::Shorten implementation that implements
the default \'makeashorterlink\' and \'makealongerlink\' functions. The options
should be able to be passed as an optional parameters to \'makeashorterlink\'
function.
|
RPM found in directory: /packages/linux-pbone/ftp5.gwdg.de/pub/opensuse/repositories/devel:/languages:/perl:/CPAN-W/openSUSE_Tumbleweed/noarch |
