in reply to Non-forking server?

IO::Select has an example showing almost exactly what you want to do.

HTH, --traveler

In Section Seekers of Perl Wisdom