Interchange 5.1, $string is unused in AuthorizeNet.pm: --- AuthorizeNet.pm.orig Thu Sep 11 13:12:56 2003 +++ AuthorizeNet.pm Fri Apr 2 16:46:54 2004 @@ -428,7 +428,6 @@ } push @query, "$key=$val"; } - my $string = join '&', @query; #::logDebug("Authorizenet query: " . ::uneval(\%query)); $opt->{extra_headers} = { Referer => $referer };