in reply to SOAP::Lite syntax
#!perl use Data::Dumper; use SOAP::Lite; my $soap = SOAP::Lite -> uri('http://www.theClient.info/Service') -> on_action( sub { join '/', 'http://www.theClien.info/Service', +$_[1] } ) -> proxy('http://www.theClien.com/Service.asmx') -> autotype(0); my $method = SOAP::Data->name('companyData')->attr( {xmlns=>"http://ww +w.theClien.info/Service"} ); my $eventCode = SOAP::Data->name('eventCode' => 'EVENT01'); my $userName = SOAP::Data->name('userName' => 'USER'); my $password = SOAP::Data->name('password' => 'PASS'); my $som = $soap->call($method => ( SOAP::Data->name('eventCode' => $eventCode), SOAP::Data->name('userName' => $userName), SOAP::Data->name('password' => $password) ));
|
|---|