This is my code
#$PARAM has all the parameters needed to make client
use SOAP::Lite +trace =>'debug';
my $xmlRequest = ''.(shift).'';
my $xmlFilter = ''.(shift).'';
my $webService = SOAP::Lite-> uri($PARAM->{NAMESPACE})
-> on_action(sub{sprintf '%s/%s', @_ })
-> outputxml("1")
-> proxy($PARAM->{ENDPOINT});
my $response='';
eval{
$response = $webService->call(SOAP::Data->name("SubmitXml")->attr({xmlns => $PARAM->{NAMESPACE}}),
SOAP::Data->name(Profile => $PARAM->{PROFILE})->type('string'),
SOAP::Data->name(Request => $xmlRequest)->type('xml'),
SOAP::Data->name(Filter => $xmlFilter)->type('xml')
);
};
if($@){print $@;}
print $response;
sub SOAP::Transport::HTTP::Client::get_basic_credentials{
return $PARAM->{USER_ID} => $PARAM->{PASS};
}
Trace reported by Client
SOAP::Transport::new: ()
SOAP::Serializer::new: ()
SOAP::Deserializer::new: ()
SOAP::Parser::new: ()
SOAP::Lite::new: ()
SOAP::Transport::HTTP::Client::new: ()
SOAP::Data::new: ()
SOAP::Data::new: ()
SOAP::Data::new: ()
SOAP::Data::new: ()
SOAP::Lite::call: ()
SOAP::Serializer::envelope: ()
SOAP::Serializer::envelope: SOAP::Data=HASH(0xeb4240) SOAP::Data=HASH(0xeb58f0) SOAP::Data=HASH(0xeb59b0) SOAP::Data=HASH(0xeb5a70)
SOAP::Data::new: ()
SOAP::Data::new: ()
SOAP::Data::new: ()
SOAP::Data::new: ()
SOAP::Transport::HTTP::Client::send_receive: HTTP::Request=HASH(0xee4820)
SOAP::Transport::HTTP::Client::send_receive: POST https://webservices.xxxxxxxx.com HTTP/1.1
Accept: text/xml
Accept: multipart/*
Accept: application/soap
Content-Length: 2025
Content-Type: text/xml; charset=utf-8
SOAPAction: http://webservices.xxxxxxx.com/SubmitXml
<_/>
SOAP::Transport::HTTP::Client::send_receive: HTTP::Response=HASH(0x1215920)
SOAP::Transport::HTTP::Client::send_receive: HTTP/1.1 200 OK
Connection: close
Date: Thu, 02 Apr 2009 10:38:09 GMT
Server: Apache-Coyote/1.1
Content-Type: text/xml;charset=utf-8
Client-Date: Thu, 02 Apr 2009 10:35:43 GMT
Client-Peer: 12.17.227.105:443
Client-Response-Num: 1
Client-SSL-Cert-Issuer: /C=US/O=Equifax/OU=Equifax Secure Certificate Authority
Client-SSL-Cert-Subject: /C=US/ST=Georgia/L=Atlanta
Client-SSL-Cipher: RC4-MD5
SOAP::Lite::DESTROY: ()
SOAP::Deserializer::DESTROY: ()
SOAP::Parser::DESTROY: ()
SOAP::Transport::DESTROY: ()
SOAP::Transport::HTTP::Client::DESTROY: ()
SOAP::Serializer::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: ()