SOAP call tweaks required

Mike_v has asked for the wisdom of the Perl Monks concerning the following question:

The following script segment
--------------------------------------------------------------------------

use SOAP::Lite +trace => [qw(method fault headers result debug)];

 $uri  = "http://webservice.proc.req.lbg.com/";
 $proxy  = "http://10.161.3.159/LBGRequestProcessorWEB/LBGOIMRequestPr
+ocessorService"; 
                  
 @params  =  (SOAP::Data->name("arg0" =>
     \SOAP::Data->value 
         (SOAP::Data->name(actionType => ""),
         SOAP::Data->name(additionalOperationType =>""),
         SOAP::Data->name(originatingSystem => ""),
         SOAP::Data->name(recipientId => ""),
         SOAP::Data->name(requestId => ""),
         SOAP::Data->name(requestType => ""),
         SOAP::Data->name(resourceType => "")
       ),
      ),
    );

 $method  = SOAP::Data->name('processRequest')
       ->attr({xmlns => $uri})  ;

 $soap = SOAP::Lite
  -> uri($uri)  -> on_action( sub { '' } )  -> proxy($proxy)  ;
          
  $result = $soap->call($method => @params);
[download]

--------------------------------------------------------------------------

gives me this output

------------------------------------------------------------------------

<?xml version="1.0" encoding="UTF-8"?>
<SOAP-ENV:Envelope
xmlns:xsi="http://www.w3.org/1999/XMLSchema-instance"
xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
xmlns:xsd="http://www.w3.org/1999/XMLSchema"
SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
<SOAP-ENV:Body>
<processRequest xmlns="http://webservice.proc.req.lbg.com/">
<arg0>
<actionType xsi:type="xsd:string"/>
<additionalOperationType xsi:type="xsd:string"/>
<originatingSystem xsi:type="xsd:string"/>
<recipientId xsi:type="xsd:string"/>
<requestId xsi:type="xsd:string"/>
<requestType xsi:type="xsd:string"/>
<resourceType xsi:type="xsd:string"/>
</arg0>
</processRequest>
</SOAP-ENV:Body></SOAP-ENV:Envelope>

After playing about in SoapUI with this I've worked out that I need the output to be as below, specifically, the extra xmlns:web line and the subsequent web: prefix of the <processRequest> tags all in bold

Any help much appreciated

<?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope
xmlns:xsi="http://www.w3.org/1999/XMLSchema-instance"
xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
xmlns:xsd="http://www.w3.org/1999/XMLSchema"
xmlns:web="http://webservice.proc.req.lbg.com/"
SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
<SOAP-ENV:Body>
<web:processRequest>
<arg0>
<actionType xsi:type="xsd:string"/>
<additionalOperationType xsi:type="xsd:string"/>
<originatingSystem xsi:type="xsd:string"/>
<recipientId xsi:type="xsd:string"/>
<requestId xsi:type="xsd:string"/>
<requestType xsi:type="xsd:string"/>
<resourceType xsi:type="xsd:string"/>
</arg0>
</web:processRequest>
</SOAP-ENV:Body></SOAP-ENV:Envelope>

Back to Seekers of Perl Wisdom