Loading ...
Sorry, an error occurred while loading the content.

3321Newbie: SOAPLite client to .NET Service

Expand Messages
  • rjdevet
    Jan 21, 2004
    • 0 Attachment
      I can't believe that I've this working, after struggling with it for
      a whole day. It should not have be this hard:
      #!perl -w

      use SOAP::Lite;

      $soap = SOAP::Lite
      -> proxy("http://win2kServer/foobar/directory.asmx")
      -> uri("http://tempuri.org/isEmailValid")
      -> on_action(sub { join('', @_) });

      my $method = SOAP::Data->name('isEmailValid')->attr({xmlns
      => 'http://tempuri.org/'});

      my $response = $soap->call($method => SOAP::Data->name
      ('emailAddress' => 'toto@...') );

      print $response;

      Is there a better way to do this?