summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorOthmar Gsenger <otti@wirdorange.org>2013-01-22 23:04:15 +0000
committerOthmar Gsenger <otti@wirdorange.org>2013-01-22 23:04:15 +0000
commitb09779bf02b247ecb05c23cc7621fa5fd8ad86dc (patch)
tree11f234f742ff6105a48609c3a3f97581f500ca57
parentadded brakes for newer perl version (diff)
removed languge request to speed up nzbindex
-rwxr-xr-xlocal/nzbindex.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/local/nzbindex.pm b/local/nzbindex.pm
index 70256fa..7df0336 100755
--- a/local/nzbindex.pm
+++ b/local/nzbindex.pm
@@ -23,10 +23,10 @@ sub http_fetch
my ($request)=@_;
my $ua = LWP::UserAgent->new;
$ua->timeout(10);
- my $cookie_jar = HTTP::Cookies->new({});
- $ua->cookie_jar($cookie_jar);
- my $response = $ua->get("http://www.nzbindex.nl/?lang=2");
- $response = $ua->get('http://www.nzbindex.nl/rss/?'.$request);
+ # my $cookie_jar = HTTP::Cookies->new({});
+ # $ua->cookie_jar($cookie_jar);
+ # my $response = $ua->get("http://www.nzbindex.nl/?lang=2");
+ my $response = $ua->get('http://www.nzbindex.nl/rss/?'.$request);
if ($response->is_success) {
return $response->decoded_content;
}