如何使用Net::server用Perl编写一个简单的聊天服务器?

如何使用Net::server用Perl编写一个简单的聊天服务器?,perl,Perl,我想编写一个聊天服务器,可能使用PreFork,将进程绑定到活动客户端。如何通过适当的过滤在客户端之间“交谈”?您可以先看看。我也使用POE?

我想编写一个聊天服务器,可能使用PreFork,将进程绑定到活动客户端。如何通过适当的过滤在客户端之间“交谈”?

您可以先看看。

我也使用POE?