http://www.perlmonks.org?node_id=834655

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

Fellow Monks,

A friend of mine is struggling with WSDL SOAP.

He wants to run a server where a SOAP service will run. He uses:

Attempting to run the server leaves this error in the user.log file: no definitions for `service' found

The WSDL can be obtained here: http://oneapi.aepona.com/content/gsma/WSDL-3-0-distribution.zip

use XML::Compile::WSDL11; use XML::Compile::SOAP11; use XML::Compile::SOAP::HTTPDaemon; my @schemas = ( '/home/.../wsdl_soap/parlayx-3.0/WSDL/parlayx-3.0/parlayx_sms_send +_service_3_1.wsdl', ); my $wsdl = XML::Compile::WSDL11->new; $wsdl->importDefinitions(\@schemas); my $daemon = XML::Compile::SOAP::HTTPDaemon->new; $daemon->operationsFromWSDL($wsdl); $daemon->run(name => 'SMS', host => 'localhost', port => 8877,);

Any ideas?

use strict; use warnings; print "Just Another Perl Hacker\n";