Lydi, kto sharit v SOAP Lite, pomogite please
Est takaja prostaja proga
#!/usr/bin/perl -w
use SOAP::Transport::HTTP;
#use HTTP::Daemon::SSL;
$daemon = SOAP::Transport::HTTP::Daemon
-> new (LocalPort => 80)
-> dispatch_to( 'Demo' )
;
print "Contact to SOAP server at ", $daemon->url, "\n";
$daemon->handle;
package Demo;
sub hi {
printf("hello, word\n");
return "hello, world";
}
sub bye {
printf("bye \n");
return "goodbye, cruel world";
}
Kak sdelat chto ona HTTPS ponimala?