How do I write a simple chat server in Perl using Net::Server?

Question

I want to write a Net::Server chat server, probably using PreFork, with process tied to an active client. How do I "talk" between clients, with the proper filtering?

Answer 1

You can start by taking a look at the chat example bundled with Net::Server.