in reply to Error while receiving SOAP envelope from client

I'm not sure what the exact problem is, but I did notice something odd in your client:

my $s = SOAP::Lite
   ->uri('World')
   ->proxy('http://localhost/soap/soapserver.cgi')
# vvvvvvvvvvvvvvvvvvvvvvvvvv
   ->GoodBye("Bad world")
   ->on_debug(sub{print@_});
# ^^^^^^^^^^^^^^^^^^^^^^^^^^
print $s->result();

[download]

The method call to the server GoodBye() returns a SOAP::SOM object (a response of sorts), and not the SOAP object (which is a link to the server), so you probably won't get debugging output from the call. I'd suggest instead using something like the following

my $soap = SOAP::Lite
   ->uri('World')
   ->proxy('http://localhost/soap/soapserver.cgi')
   ->on_debug(sub{warn @_});
$som = $soap ->GoodBye("Bad world");
if ( $som->fault ) {
   warn $som->faultcode() ||'', " : ", $som->faultstring()||'',
      " : ",$som->faultdetail()||'',"\n";
} else {
   print $som->result();
}

[download]

With debugging on, you should get both the HTTP headers that are sent, and the XML payload of the request and response.

Replies are listed 'Best First'.
Re^2: Error while receiving SOAP envelope from client
by chanakya (Friar) on Mar 03, 2005 at 10:49 UTC
    I've used the code specified but I still get the same error which I've showed in the earlierpost

    Below is the output after executing the soap client(without use SOAP::Lite +trace => 'all';)

    [root@shobhan soap]# perl soapClient.pl
POST http://localhost/soap/soapserver.cgi HTTP/1.1
Accept: text/xml
Accept: multipart/*
Content-Length: 503
Content-Type: text/xml; charset=utf-8
SOAPAction: "World#GoodBye"

<?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope xmlns:xsi="ht
+tp://www.w3.org/1999/XMLSchema-instance" xmlns:SOAP-ENC="http://schem
+as.xmlsoap.org/soap/encoding/" xmlns:SOAP-ENV="http://schemas.xmlsoap
+.org/soap/envelope/" xmlns:xsd="http://www.w3.org/1999/XMLSchema" SOA
+P-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"><SOAP
+-ENV:Body><namesp1:GoodBye xmlns:namesp1="World"><c-gensym3 xsi:type=
+"xsd:string">Bad world</c-gensym3></namesp1:GoodBye></SOAP-ENV:Body><
+/SOAP-ENV:Envelope>
HTTP/1.1 200 OK
Connection: close
Date: Thu, 03 Mar 2005 10:22:21 GMT
Accept-Ranges: bytes
ETag: "6c341-85-68808f40"
Server: Apache/2.0.52 (Fedora)
Content-Length: 133
Content-Type: text/plain; charset=UTF-8
Last-Modified: Wed, 02 Mar 2005 10:59:33 GMT
Client-Date: Thu, 03 Mar 2005 10:22:21 GMT
Client-Peer: 127.0.0.1:80
Client-Response-Num: 1

#!/usr/bin/env perl5.8.6

use SOAP::Transport::HTTP;
use World;

SOAP::Transport::HTTP::CGI
  -> dispatch_to('World')
  -> handle;

not well-formed (invalid token) at line 1, column 1, byte 1 at /usr/lo
+cal/lib/perl5/site_perl/5.8.6/i686-linux/XML/Parser.pm line 187
#!/usr/bin/env perl5.8.6

use SOAP::Transport::HTTP;
use World;

SOAP::Transport::HTTP::CGI
  -> dispatch_to('World')
  -> handle;
 at soapClient.pl line 23

    [download]
    Does this imply that the XML response from the server is not well-formed.
    Any ideas what might be wrong..

    Thanks
[reply]
[d/l]
      you must add in your conf of apache2 AddHandler cgi-script .cgi .pl
[reply]
        hi, I also got the same error but it was resolved when i added AddHandler cgi-script .cgi .pl in apache conf file. But now I am getting 403 Forbidden Error saying You don't have permission to access /index.cgi. Please tell me how to fix this. Thanks, KSN
[reply]
        Thanks for the original example. If you've not worked it out by now, you need to add the following to httpd.conf : <Directory "/var/www/html/soap"> Options +ExecCGI AddHandler cgi-script .cgi .pl </Directory>
[reply]
        you should also add the Options +ExecCGI after the Addhandler line
[reply]

In Section Seekers of Perl Wisdom