SOAP::Lite を使用して Web サービス クライアントを作成しています。最初の XML パケットは、Java Testing GUI が送信するものです。正しい応答を受け取ります。
2 番目は、Perl クライアントが送信している XML パケット (SOAP::Lite デバッグ出力による) で、サーバーから受け取った応答は、入力されたすべての引数 (hostnameFQ など) が空であるというものです。
<?xml version="1.0" encoding="UTF-8"?>
<S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/">
<S:Header/>
<S:Body>
<ns2:postEvent xmlns:ns2="http://ws.health.server/">
<hostnameFQ>a</hostnameFQ>
<eventLabel>b</eventLabel>
<deviceInst>c</deviceInst>
<severity>d</severity>
<message>e</message>
<eventSource>f</eventSource>
</ns2:postEvent>
</S:Body>
</S:Envelope>
<?xml version="1.0" encoding="UTF-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:xsd="http://www.w3.org/2001/XMLSchema"
soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
<soap:Body>
<postEvent xmlns="http://ws.health.server/">
<hostnameFQ>a</hostnameFQ>
<eventLabel>b</eventLabel>
<deviceInst>c</deviceInst>
<severity>d</severity>
<message>e</message>
<eventSource>f</eventSource>
</postEvent>
</soap:Body>
</soap:Envelope>
私には同じように見えるので、何が起こっているのかよくわかりません。
これが役立つ場合に備えて、これが私のPerlコードです。
my $EVENT_LISTENER_PROXY = "http://localhost:8080/EventListener/EventListener";
my $soap = SOAP::Lite->new( proxy => $EVENT_LISTENER_PROXY);
$soap->on_action( sub { "http://ws.health.server/#postEvent" });
$soap->autotype(0);
$soap->default_ns('http://ws.health.server/');
my $som = $soap->call("postEvent",
SOAP::Data->name('hostnameFQ')->value( "a" ),
SOAP::Data->name('eventLabel')->value( "b" ),
SOAP::Data->name('deviceInst')->value( "c" ),
SOAP::Data->name('severity')->value( "d" ),
SOAP::Data->name('message')->value( "e" ),
SOAP::Data->name('eventSource')->value( "f" )
);
誰にもアイデアはありますか?