Olá Marcio,<br><br>Dá uma olhada no XML::Compile::WSDL11, <a href="http://search.cpan.org/~markov/XML-Compile-SOAP-2.08/lib/XML/Compile/WSDL11.pod">http://search.cpan.org/~markov/XML-Compile-SOAP-2.08/lib/XML/Compile/WSDL11.pod</a> .<br>
É o que eu tenho usado para comunicar com webservices.<br><br clear="all">Jorge Augusto Senger<br>jasenger (at) <a href="http://gmail.com">gmail.com</a><br><br>use Perl;<br>
<br><br><div class="gmail_quote">2009/7/16 Marcio Mello <span dir="ltr">&lt;<a href="mailto:marcio@modapoint.com.br">marcio@modapoint.com.br</a>&gt;</span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">






<div bgcolor="#ffffff">
<div><font face="Arial" size="2">Olá à todos, </font></div>
<div><font face="Arial" size="2">Se alguém puder colaborar com uma 
dica....</font></div>
<div><font face="Arial" size="2">Tenho que fazer uma conexão com um web service que 
usa SOAP wsdl.</font></div>
<div><font face="Arial" size="2">Tenho um exemplo deles em PHP mas preciso em PERL. 
</font></div>
<div><font face="Arial" size="2">Pelo que vi o módulo SOAP::Lite resolve o caso, mas 
não sei ao certo como aplicar.</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">O que tenho como exemplo em PHP é:</font></div>
<div><font face="Arial" size="2">   if 
(isset($_REQUEST[&#39;step&#39;]))<br>   {<br>      
$cardId = $_REQUEST[&#39;cardId&#39;];<br>      $cardIdType = 
$_REQUEST[&#39;cardIdType&#39;];<br>      $ani = 
$_REQUEST[&#39;ani&#39;];<br>      
<br>      $client = new soapclient(&quot;CCPServiceV1.wsdl&quot; 
, true);<br>      
$client-&gt;setCredentials($_SESSION[&#39;username&#39;], 
$_SESSION[&#39;password&#39;]);<br>      $params = 
array();<br>      $params[&#39;cardId&#39;] = 
$cardId;<br>      $params[&#39;cardIdType&#39;] = 
$cardIdType;<br>      $params[&#39;ani&#39;] = 
$ani;<br>      <br>      
$result = $client-&gt;call(&#39;registerANI&#39;, $params);</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">E a URL de trabalho é: <a href="http://ws.telehumana.com:8080/services/CCPServiceV1Port?wsdl" target="_blank">http://ws.telehumana.com:8080/services/CCPServiceV1Port?wsdl</a></font></div>

<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">Alguma idéia de como fazer isto com o 
SOAP::Lite?</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">Grato por qualquer ajuda.</font></div>
<div><font face="Arial" size="2"></font> </div>
<div><font face="Arial" size="2">Sds,</font></div>
<div><font face="Arial" size="2">Marcio Mello.</font></div></div>
<br>_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br></blockquote></div><br>