X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fik3qar.pl;h=71f1e735c1d7fa4f2d5324fd866b3adbde986b3c;hb=2708b926bf3f82ab20ff266afc8aa36adaac315b;hp=d18906ae0db0b3d8d72e287923e759e5e8a280ee;hpb=fd2d8314dd4fcdd7997ef80e7740702e0bad618d;p=spider.git diff --git a/cmd/show/ik3qar.pl b/cmd/show/ik3qar.pl index d18906ae..71f1e735 100644 --- a/cmd/show/ik3qar.pl +++ b/cmd/show/ik3qar.pl @@ -27,7 +27,8 @@ sub handle dbg("IK3QAR: url=$path") if isdbg('ik3qar'); Log('call', "$call: SH/IK3QAR $line"); - my $r = HTTPMsg->get($self->call, $target, $port, $path); + my $r = AsyncMsg->get($self, $target, $path, prefix=>'qar> ', + 'User-Agent' => "DxSpider;$main::version;$main::build;$^O;$main::mycall;$call"); if ($r) { push @out, $self->msg('m21', "show/ik3qar"); } else {