如何在使用SOAP :: Lite的Perl中的SOAP-Request中創建參數？

Question

如何使用SOAP :: Lite在perl中創建以下請求？

<?xml version="1.0" encoding="utf-8"?> 
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> 
    <soap:Body> 
    <InsertVerbalRecording xmlns="xyz.abc.ws"> 
     <inVar> 
     <VerbalPrefix>string</VerbalPrefix> 
     <VerbalID>int</VerbalID> 
     <ClientNo>int</ClientNo> 
     </inVar> 
    </InsertVerbalRecording> 
    </soap:Body> 
</soap:Envelope> 

任何指針表示讚賞。

Answer 1

想通了，就應該像這樣工作...

my @params = SOAP::Data->name("inVar" => \SOAP::Data->value((SOAP::Data->name(VerbalPrefix => 'V'), SOAP::Data->name(VerbalID => $verbalId),

添加PARAMS後，撥打電話的實際方法......

my $res = $proxy->call('InsertVerbalRecording' => @params);