Re: Soap Lite Error

Hi again ecuguru. :)

I should preface this by saying that I don't have SOAP::Lite installed nor the time to do so, but your syntax appears ... well, a little "hinky" to me. I'm not sure why you've got your -> surrounded by spaces when near the identifier service and NOT surrounded by spaces near the identifier som. What happens if you get rid of those spaces, such that:

sub soapGet(){
    my $service =
        SOAP::Lite->service('http://ip/Info.asmx?WSDL');
    
    $service->GetHospitalInfo();
    my $som = $service->call;
    
    if ($som->fault) {
      print "SOAP FAULT:\n";
      print Dumper $som;
      exit;
    }
[download]

--chargrill

$,=42;for(34,0,-3,9,-11,11,-17,7,-5){$*.=pack'c'=>$,+=$_}for(reverse s
+plit//=>$*
){$%++?$ %%2?push@C,$_,$":push@c,$_,$":(push@C,$_,$")&&push@c,$"}$C[$#
+C]=$/;($#C
>$#c)?($ c=\@C)&&($ C=\@c):($ c=\@c)&&($C=\@C);$%=$|;for(@$c){print$_^
+$$C[$%++]}
[download]

Comment on Re: Soap Lite Error Select or Download Code

Replies are listed 'Best First'.
Re^2: Soap Lite Error by ecuguru (Monk) on Mar 15, 2006 at 18:51 UTC
Hi again Chargrill! U definitely helped me out on the spaces issue on the last post, but afriad this one isn't it. My code now looks like: `sub soapGet(){ my $service = SOAP::Lite->service('http://server/Info.asmx?WSD +L'); $service->want_som(1); $service->GetHospitalInfo(); my $som = $service->call(); if ($som->fault) { print "SOAP FAULT:\n"; print Dumper $som; exit; }` [download] And I still get the same error: `document/literal support is EXPERIMENTAL in SOAP::Lite at /Library/Per +l/5.8.6/SOAP/Lite.pm line 2818. Can't call method "name" without a package or object reference at /Lib +rary/Perl/5.8.6/SOAP/Lite.pm line 2980.` [download] Any other ideas appreciated, and in the meantime I'm going to go try to uninstall the new soap::lite and reinstall the old soap module. I've only done module installing via CPAN, so this'll be new. thanks!	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: Soap Lite Error
by ecuguru (Monk) on Mar 15, 2006 at 18:51 UTC

sub soapGet(){
        my $service = SOAP::Lite->service('http://server/Info.asmx?WSD
+L');
        $service->want_som(1);
        $service->GetHospitalInfo();
        my $som = $service->call();

        if ($som->fault) {
          print "SOAP FAULT:\n";
          print Dumper $som;
          exit;
        }
[download]

document/literal support is EXPERIMENTAL in SOAP::Lite at /Library/Per
+l/5.8.6/SOAP/Lite.pm line 2818.
Can't call method "name" without a package or object reference at /Lib
+rary/Perl/5.8.6/SOAP/Lite.pm line 2980.
[download]

[reply]
[d/l]
[select]