#!perl -w

# -- SOAP::Lite -- guide.soaplite.com -- Copyright (C) 2001 Paul Kulchenko --

use SOAP::Transport::HTTP;

SOAP::Transport::HTTP::CGI
  -> dispatch_to(
                'cgi-bin/dev/soap/',
                'Soaper'
                )
  -> handle;

package Soaper;

sub hi {
  return "hello, world";
}

sub bye {
  return "goodbye, cruel world";
}

sub languages {
  return ("Perl", "C", "sh");
}

##</code><code>##

#!perl -w

# -- SOAP::Lite -- guide.soaplite.com -- Copyright (C) 2001 Paul Kulchenko --

use SOAP::Lite;

print SOAP::Lite
-> uri('http://foo.example.com/Soaper')
  -> proxy('http://foo.example.com/cgi-bin/dev/soap/hibye.cgi')

  -> hi()
  -> result;

##</code><code>##

[Mon May 15 14:13:28 2006] [error] (2)No such file or directory: exec of /opt/dncms/web/cgi-bin/dev/soap/hibye.cgi failed
[Mon May 15 14:13:28 2006] [error] [client 130.42.71.204] Premature end of script headers: /opt/dncms/web/cgi-bin/dev/soap/hibye.cgi