in reply to Re^9: Soap::lite - https ?
in thread Soap::lite - https ?
This will 'service' my soap requests at https://<server>:8001.use HTTP::Daemon::SSL; use HTTP::Status; use SOAP::Lite; use SOAP::Transport::HTTP; # my soap package use auth; # Make sure you have a certs/ directory with "server-cert.pem" # and "server-key.pem" in it before running this! my $daemon = HTTP::Daemon::SSL->new(LocalPort => 8001) || die; my $soap = SOAP::Transport::HTTP::Server -> new ( ) -> dispatch_to(qw(auth)); print "Please contact me at: <URL:", $daemon->url, ">\n"; while (my $conn = $daemon->accept()) { while (my $request = $conn->get_request()) { $soap->request($request); $soap->handle(); my $response = $soap->response(); $conn->send_response($response); } $conn->close; undef($conn); }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^11: Soap::lite - https ?
by perlchild (Acolyte) on Aug 12, 2008 at 23:38 UTC |