X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2F425.pl;h=353f2b9d914ac01d4ee3caa134de5fa2c0a176ab;hb=f493dbf120a0a175a7788ee51c9928377b0f4c50;hp=44ad0a30b89f7eb6a2d8df12ec22c9e73b40fdd0;hpb=5faa3742af7d0a5f2c5d28cd98efd37214f677dc;p=spider.git diff --git a/cmd/show/425.pl b/cmd/show/425.pl index 44ad0a30..353f2b9d 100644 --- a/cmd/show/425.pl +++ b/cmd/show/425.pl @@ -3,7 +3,7 @@ # # from an idea by Leo,IZ5FSA and 425DxNews Group # -# $Id$ +# # my ($self, $line) = @_; my @list = map {uc} split /\s+/, $line; # generate a list of callsigns @@ -38,7 +38,7 @@ if (!$t || $@) { else { $op="op=search&query=".$list[0]; } - my $s = "GET $url/hf/dx-news/iz5fsa/spider.php?$op HTTP/1.0\n" + my $s = "GET $url/hf/dx-news/spider.php?$op HTTP/1.0\n" ."User-Agent:DxSpider;$main::version;$main::build;$^O;$main::mycall;$call;$list[0]\n\n"; dbg($s) if isdbg('425'); $t->print($s);