[ic] PaypalExpress module

[Steve Graham]

>
>There certainly will be when you stop it and have debugging turned
>on, but I am curious about a report of this happening on first startup.


Here is the debug.log before a successful completion of the 
transaction. I notice there is a bunch of  SOAP::Data::new: () also - 
I haven't counted both to see if the New and Destroy qty matches....


Date: Wed, 14 Feb 2007 22:36:36 GMT
Server: Apache/1.3.33 (Unix) mod_ssl/2xxxx OpenSSL/0.xxxxx
Content-Length: 3082
Content-Type: text/xml; charset=utf-8
Client-Date: Wed, 14 Feb 2007 22:36:49 GMT
Client-Peer: 216.113.188.10:443
Client-Response-Num: 1
Client-SSL-Cert-Issuer: /O=VeriSign Trust Network/OU=VeriSign, 
Inc./xxxxxxxxxxxxxxxxxxxxxxx
Client-SSL-Cert-Subject: /C=US/ST=California/xxxxxxxxxxxxxxxxxxx
Client-SSL-Cipher: DHE-RSA-AES256-SHA
Client-SSL-Warning: Peer certificate not verified

<?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope 
xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:SO$
SOAP::Deserializer::deserialize: ()
SOAP::Parser::decode: ()
SOAP::SOM::new: ()
###ln618: Ack=Success, token=EC-0Wxxxx, tid=62H4xxxxxxxxxx334
###ln619: paystatus=Completed, paydate=2007-02-14T22:36:37Z
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
SOAP::Data::DESTROY: ()
Safe: 'require' trapped by operation mask at (tag 'perl') line 6.
Safe: 'require' trapped by operation mask at (tag 'perl') line 6.


         my $out = $Scratch->{transaction_record};
         $out =~ s/^\s+//;
         $out =~ s/^\s+//mg;
         $out =~ s/\s+$//mg;
         $out =~ s/[\r\n]+/\n/;
         $out =~ s/:\n(\d+|yes|succe\w+|fail\w+)\n/: $1\n/ig;
         return $out;


Safe: 'require' trapped by operation mask at (tag 'perl') line 6.


         my $out = $Scratch->{transaction_record};
         $out =~ s/^\s+//;
         $out =~ s/^\s+//mg;
         $out =~ s/\s+$//mg;
         $out =~ s/[\r\n]+/\n/;
         $out =~ s/:\n(\d+|yes|succe\w+|fail\w+)\n/: $1\n/ig;
         return $out;


-Steve