[perl] SOAP / WSDL / GlassFish

[Chewy]

Ik heb een wsdl op een server draaien die gedeployed is door glassfish.
Deze wsdl kan met succes vanuit python en java aangeroepen worden en resultaten worden verkregen.
Echter als ik Perl gebruik komen de argumenten die perl meestuurd nooit aan op de server en geeft de server daardoor geen goede response.

Perl:

use SOAP::Lite;
my $WSDL = 'http://server:8081/Webservice/WebserviceService?wsdl';
my $soap = SOAP::Lite->service($WSDL);
my $result = $soap->hello("world");
print $result . "\n";
$result = $soap->hellowithoutparameters;
print $result . "\n";

Dit zou twee regels moeten genereren waarbij bij de eerste regel "world" terug komt, en bij de tweede een regel die aanduid dat hellowithoutparameters methode is aangeroepen. Echter komt alleen de tweede regel terug.
In de server log is dan ook alleen te zien dat de methodes aangeroepen worden met 'null' argumenten.

Ook dit helpt niet.

Perl:

my $string = SOAP::Data->type(string => 'world');
my $result = $soap->hello($string);

De soap request die perl genereerd is als volgt.

XML:

<?xml version="1.0" encoding="UTF-8"?>
  <soap:Envelope xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:tns="http://Webservices/" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <soap:Body>
    <tns:hello>
      <c-gensym3 xsi:type="xsd:string">
        world
      </c-gensym3>
     </tns:hello>
   </soap:Body>
</soap:Envelope>

Wat Glassfish als voorbeeld aangeeft ziet er echter zo uit.

XML:

<?xml version="1.0" encoding="UTF-8"?>
    <S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/">
        <S:Header/>
        <S:Body>
            <ns2:hello xmlns:ns2="http://Webservices/">
                <name>world</name>
            </ns2:hello>
        </S:Body>
    </S:Envelope>

De python code die wel werkt is als volgt:

Python:

import suds
url = 'http://server:8081/Webservice/WebserviceService?wsdl'
self.client = suds.client.Client(url)
result = self.client.service.hello('world')
print result

Ik heb meerdere dingen geprobeerd maar ik kom er niet uit. Kunnen jullie helpen?

[Red devil]

Mmmm als het wel al goed werkt in Java, waarom niet alles in Java maken?
Als je het wel via SOAP zou willen laten werken, moet je ws iets vinden waardoor je SOAP messages wat kunt laten strippen.

[Shebang]

Ik zie dat je SOAP::Lite gebruikt icm. een WSDL file. SOAP::Lite heeft zelf een slechte ondersteuning voor WSDL files, heb je al gekeken naar SOAP::WSDL of een andere bibliotheek?

[Red devil]

Is het al gelukt?

[PeterBezemer]

Shebang schreef op vrijdag 18 december 2009 @ 14:24:
Ik zie dat je SOAP::Lite gebruikt icm. een WSDL file. SOAP::Lite heeft zelf een slechte ondersteuning voor WSDL files, heb je al gekeken naar SOAP::WSDL of een andere bibliotheek?

Als je op metacpan kijkt bij soap::wsdl staat er dit:

"This module is not recommended for new application development. Please use XML::Compile::SOAP or SOAP::Lite instead if possible.
This module has a large number of known bugs and is not being actively developed. This 3.0 release is intended to update the module to pass tests on newer Perls. This is a service to existing applications already dependent on this module."

[RobIII]

PeterBezemer schreef op vrijdag 20 september 2019 @ 10:14:

Ik denk dat TS tien jaar later niet echt nog een antwoord verwachtte

[ Voor 50% gewijzigd door RobIII op 20-09-2019 11:02 ]