ForkOnAccept for SOAP::Lite TCP server

Do you have a question? Post it now! No Registration Necessary.  Now with pictures!

I saw (and tried a modified version of) ForkOnAccept buried in examples
for SOAP::Lite, to no avail.

What I want to do is get a SOAP server that forks for TCP connections. I
would have thought this would be easy, but since the server for TCP is
run like this:

my $daemon = SOAP::Transport::TCP::Server
   ->new(LocalAddr => $host, LocalPort => $port, Listen => 5);
print "SOAP TCP server listening...\n";
print "   Host: ", $daemon->sockhost, "\n";
print "   Port: ", $daemon->sockport, "\n";

I don't get a chance to catch and fork on the accept. Any ideas?


Site Timeline