X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fqrz.pl;fp=cmd%2Fshow%2Fqrz.pl;h=5301c2cd6f72d35c39b562eec5eb3db15664dc4a;hb=4e913f45fcd752c8a084dfb31f2c8e0da30f59b1;hp=45363143c6824c0b672dffaac6bd3cc43b041005;hpb=08ef12723f860ed402ddb5f80ff163b1851e17ad;p=spider.git

diff --git a/cmd/show/qrz.pl b/cmd/show/qrz.pl
index 45363143..5301c2cd 100644
--- a/cmd/show/qrz.pl
+++ b/cmd/show/qrz.pl
@@ -24,7 +24,7 @@ foreach $l (@list) {
 			 Timeout  =>  5);
 	if ($t) {
 		$t->print("GET /database?callsign=$l HTTP/1.0\n\n");
-		Log('call', "$call: show/qrz $l");
+		Log('call', "$call: show/qrz \U$l");
 		my $state = "call";
 		while (my $result = $t->getline) {
 #			print "$state: $result";