package Business::OnlinePayment::AuthorizeNet;
-# $Id: AuthorizeNet.pm,v 1.8 2002-04-23 01:38:59 ivan Exp $
+# $Id: AuthorizeNet.pm,v 1.9 2002-04-24 02:39:38 ivan Exp $
use strict;
use Business::OnlinePayment;
$self->result_code($col[2]);
$self->error_message($col[3]);
unless ( $self->result_code() ) { #additional logging information
+ $page =~ s/\x00/\^0/g;
$self->error_message($col[3].
" DEBUG: No x_response_code from server, ".
"(HTTPS response: $server_response) ".