如何使用Net :: Server在Perl中编写简单的聊天服务器?

Tim*_*mmy 3 perl

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