Java endpoint - perl consumer web service -

-

i've problem calling java endpoint (code below) perl client (activeperl 5.16). code snippets book java web services , running

package ch01.ts;  import javax.jws.webmethod; import javax.jws.webservice; import javax.jws.soap.soapbinding; import javax.jws.soap.soapbinding.style;  @webservice @soapbinding(style=style.rpc) public interface timeserver {      @webmethod     string gettimeasstring();      @webmethod     long gettimeaselapsed(); } 
package ch01.ts;  import java.util.date; import javax.jws.webservice;  @webservice(endpointinterface="ch01.ts.timeserver") public class timeserverimpl implements timeserver {      public string gettimeasstring() {         return new date().tostring();     }      public long gettimeaselapsed() {         return new date().gettime();     } } 
package ch01.ts;  import javax.xml.ws.endpoint;  public class timeserverpublisher {     public static void main(string[] args) {          endpoint.publish("http://127.0.0.1:9876/ts", new timeserverimpl());     } }

and perl consumer:

use soap::lite;  $url = 'http://127.0.0.1:9876/ts?wsdl'; $service = soap::lite->service($url);  print "\ncurrent time is: ",$service->gettimeasstring(); print "\nelapsed miliseconds epoch: ", $service->gettimeaselapsed();

when i'm calling web service i'm having stack trace:

maj 04, 2013 10:21:40 com.sun.xml.internal.ws.transport.http.httpadapter$httptoolkit    handle severe: couldn't create soap message. expecting envelope in namespace     http://schemas.xmlsoap.org/soap/envelope/, got http://schemas.xmlsoap.org/wsdl/soap/ com.sun.xml.internal.ws.protocol.soap.versionmismatchexception: couldn't create soap   message. expecting envelope in namespace http://schemas.xmlsoap.org/soap/envelope/, got   http://schemas.xmlsoap.org/wsdl/soap/ @ com.sun.xml.internal.ws.encoding.streamsoapcodec.decode(unknown source)

i think soap version problem, above example 1.1, when i've change client code 

my $service = soap::lite->service($url)->soapversion('1.2');

then different error throw

com.sun.xml.internal.ws.server.unsupportedmediaexception: unsupported content-type: application/soap+xml; charset=utf-8 supported ones are: [text/xml]

i need either dealing envelope problem or content-type. grateful directions, code , else help.

i not quite sure of perl->soap api, first case client version 1.1 may need mention namespace somewhere.

may like

server->setnamespace() //or soap::lite->service($url,"<namespace>"); //please search perl web service client         examples

and second case(1.2) service expecting text , api sends soap encoding or something.

refer http://www.herongyang.com/web-services/perl-soap-1-2-unsupported-media-type-application-soap.html

this may helpful

  $client = soap::lite->new()   ->soapversion('1.2')   ->envprefix('soap12')   ->default_ns('http://xmlme.com/webservices')   ->on_action( sub {join '/', @_} )   ->readable(true)   ->proxy('http://www.xmlme.com/wsshakespeare.asmx');

and

http://www.herongyang.com/web-services/perl-soap-1-2-request-differences-soap-1-1-and-1-2.html

hope helps


Comments

Post a Comment

Popular posts from this blog

Perl - how to grep a block of text from a file -

-
it can in xml or text format. how in general grep block of text in perl? <track type="ws"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>0</locationindex> <propertyindex>0</propertyindex> </range> </track> <track type="ps" id="1"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>1</locationindex> <propertyindex>1</propertyindex> </range> </track> i want grep type="ps" , till </range> . one solution open file, read line line , match block. open(fh, "file.txt"); foreach $line (<fh>) { if ($line =~ m/type="cc"(.*?)<\/range>/) { print $1; } } but there more optimal solution without reading file line l
Read more

delphi - How to remove all the grips on a coolbar if I have several coolbands? -

-
Image
if set mycoolbar.fixedorder true,only grip on first band hidden. well,if use delphi 7 create vcl forms application,then put coolbar on , create 3 coolbans hold other controls,only grip , top coolbands can hidden setting mycoolbar.fixedorder:=true. i've uploaded picture make things clear. you got fixedorder property wrong. fixed property not allow bands rearranged if set true . setting property of coolbar true keep user changing bands order @ runtime, user can still move , resize bands. can give advice can do, actual solution problem, well, have wait answer. my advice use 3 coolbars in row , setting "fixedorder" property true , bandborderstyle bsnone . way grip hidden on of them. about property, it's not bug of ide, actual preference of property.
Read more

javascript - Animating array of divs; only the final element is modified -

-
this baffling me @ moment. i'm experienced programmer looking throw bit of surprise fiancee on countdown page our wedding. desired effect simulated confetti falling behind main page. setup follows: i have array of divs in javascript. each div absolutely positioned on page. have interval set updates every 50 or milliseconds. on each tick, run loop on array of divs, , calculations , update positions. problem problem having, however, though can see divs created, stored array, , modified (in case, each has slight randomized rotation) during initialization phase, once tick update position starts, div stored in whatever last slot of array gets position updated. tried hard-coding each div index testing purposes, strictly last element update position. upon printing current "left" , "top" style values each div before , after calculations shows value has been changed, no visible change noticeable. here's basic code: javascript var container;
Read more