X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FModules%2Fzsi.pl;h=6a4a82e7c27d4a1feca9c40588f28b03995ed39a;hb=8a79d430aef83402420b5a8378e78cfa01051c93;hp=c1eb6928fcc6f83b3b09c5a4520b700dc1c2cf8a;hpb=d09c7d3563f2a2c44065847a96bb51942d9c1d8f;p=infobot.git diff --git a/src/Modules/zsi.pl b/src/Modules/zsi.pl index c1eb692..6a4a82e 100644 --- a/src/Modules/zsi.pl +++ b/src/Modules/zsi.pl @@ -26,6 +26,8 @@ package zsi; my $no_zsi; +use strict; + BEGIN { $no_zsi = 0; eval "use LWP::UserAgent"; @@ -43,7 +45,7 @@ sub queryText { my $res_return = 5; my $ua = new LWP::UserAgent; - $ua->proxy('http', $::param{'httpProxy'}) if (&::IsParam("httpProxy")); + $ua->proxy('http', $::param{'httpProxy'}) if (&::IsParam("httpProxy")); $ua->timeout(10); @@ -95,7 +97,7 @@ sub queryText { sub query { my ($args) = @_; &::performStrictReply(&queryText($args)); - return; + return; } 1;