$svc = SOAP::Lite -> service('http://localhost:8000/Hello.wsdl') -> proxy('http://localhost:8000/Hello') -> on_action(sub {sprintf '%s/%s', @_}); $resp = $svc->Hello("Jimmy");
<readmore title ="See the code"> $resp = $svc->call(SOAP::Data->name('Hello') ->attr ({'xmlns'=>'sth'}) => SOAP::Data->name('')->value("Jimmy"));
<?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope xmlns:xsi=htt +p://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-EN +V:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"><SOAP-ENV +:Body><Hello xmlns="sth"><c-gensym3>Jimmy</c-gensym3></Hello></SOAP-E +NV:Body></SOAP-ENV:Envelope>
<?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope xmlns:xsi=htt +p://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-EN +V:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"><SOAP-ENV +:Body><Hello xmlns="sth">Jimmy</Hello></SOAP-ENV:Body></SOAP-ENV:Enve +lope>
In reply to Perl Web Service by bubles_88
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |