Re: Get variables value in Perl

Fábio Berbert de Paula <[email protected]> Thu, 2 Oct 2003 11:14:12 -0300
Newsgroups gmane.comp.windows.devel.soap.general
Message-ID <[email protected]>
Hi Robin,

I resolved my problem by another way. I used SOAP::Lite
+trace => 'debug' to view how to send information trought
web server and coded a pure Perl script to send these
headers and XML via IO::Socket in the same way that the
origin ASP script do it. Was't the best way, but worked :)

Debug rulez!

Thanks for the help.

> Well $login is the empty string (not null) because you
> never assign to it. If getLogin() returns the login, then
> you ought to assign there.
>
> =====
> #!/usr/bin/perl -w
> use SOAP::Lite +autodispatch =>
>                  service      =>
>                  'http://mydomain.com/Dispatcher.wsdl';
>
> my $sessionId = 589484;
> my $login = getLogin($sessionId);
> print "The login is: $login\n";
> =====
>
> Does that work better?
>
> --
> Robin Berjon <[email protected]>
> Research Scientist, Expway      http://expway.com/
> 7FC0 6F5F D864 EFB8 08CE  8E74 58E6 D5DB 4889 2488