X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite.pl;h=691b8a38d937509ac469aad8819c5638fbbae2ed;hb=88a58c0136ad9e42407fbe3996daaf4a4c82cceb;hp=691ef04ceb1ce30ae34d4a3ca5296c68fbc5b637;hpb=542ba5f881a3de86e9d6b01c64dbdbcff172fbaf;p=videosite.git diff --git a/videosite.pl b/videosite.pl index 691ef04..691b8a3 100644 --- a/videosite.pl +++ b/videosite.pl @@ -153,7 +153,7 @@ sub expand_url_shortener { my $s = shift; my $os = ''; my @urlshortener = ( - 'is.\gd/[[:alnum:]]+', + 'is\.gd/[[:alnum:]]+', 'otf\.me/[[:alnum:]]+', 'hel\.me/[[:alnum:]]+', '7ax\.de/[[:alnum:]]+', @@ -162,6 +162,7 @@ sub expand_url_shortener { 'bit\.ly/[[:alnum:]]+', 'tinyurl\.com/[[:alnum:]]+', 'pop\.is/[[:alnum:]]+', + 'post\.ly/[[:alnum:]]+', ); my $ua = LWP::UserAgent->new(agent => 'Mozilla', max_redirect => 0); my $i = 10;