Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Re^5: SOAP call tweaks required

by Anonymous Monk
on Dec 07, 2010 at 14:20 UTC ( #875813=note: print w/replies, xml ) Need Help??

in reply to Re^4: SOAP call tweaks required
in thread SOAP call tweaks required

Strictly speaking, that ain't necessary :)
#!/usr/bin/perl -- use strict; use warnings; use SOAP::Lite; #~ use SOAP::Lite 0.65 +trace => 'debug'; use SOAP::Lite +trace => [ 'all', '-objects' ]; my $soap = SOAP::Lite->proxy( 'http://localhost/blah/DummyService', timeout => +1, ); my $serializer = $soap->serializer(); $serializer->register_ns( 'http://mydummy.namespace.localhost', 'mns' +); my $data = [ SOAP::Data->name('mns:test'), SOAP::Data->name( 'mns:description' => 'an item in my namespace', +) ->type('mns:mytype') ]; print $serializer->envelope( method => @{ $data } ), "\n"; warn "\n", '-' x 66, "\n"; my $som = eval { $soap->call( @{$data} ) }; warn "\n", '-' x 66, "\n"; __END__ ### *nix $ perl 3 2>/dev/null |xml_pp $ perl 2>NUL |xml_pp <?xml version="1.0" encoding="UTF-8"?> <soap:Envelope soap:encodingStyle=" +oding/" xmlns:mns="http://mydummy.namespace.localhost" xmlns:soap="ht +tp://" xmlns:soapenc="http://schema" xmlns:xsd=" +hema" xmlns:xsi=""> <soap:Body> <mns:test> <mns:description xsi:type="mns:mytype">an item in my namespace</ +mns:description> </mns:test> </soap:Body> </soap:Envelope>

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://875813]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (4)
As of 2017-02-28 04:54 GMT
Find Nodes?
    Voting Booth?
    Before electricity was invented, what was the Electric Eel called?

    Results (396 votes). Check out past polls.