perl socket 聊天室类的问题

想像的瞬间

1^# 想像的瞬间发表于 2008-10-31 10:02

并不需要聊天室那样的广播，是像QQ一样1对1的消息，想通过服务器用Socket转发。也是通过IO::Socket模块吗？各位达人有没有例子代码？谢谢了。

撒哈拉里的鱼

2^# 撒哈拉里的鱼发表于 2008-10-31 11:48

网络不用IO::Socket用什么？
你可以保存一个hash，每个用户ID对应一个socket，拿到命令之后根据目的用户对应到目的socket，写进去就好了。至于读，可以用IO::Select来进行，轮询所有的socket。

machine

3^# machine 发表于 2008-11-01 21:42

这样做会不会有问题，如果用户多的时候，不是要建立很多socket，资源的使用会不会有限制，我知道做服务器的话，windows下可以使用完全端口，linux下可以用连接池，可都是用c语言，用perl写的话有类似的机制吗？

撒哈拉里的鱼

4^# 撒哈拉里的鱼发表于 2008-11-02 20:35

没看我说了IO::Select么？你也可以用POE做。

hotsnow

5^# hotsnow 发表于 2008-11-03 11:44

请问有什么IO::Socket学习的资料或书籍推荐么？

ynchnluiti

6^# ynchnluiti 发表于 2008-11-03 11:46

perldoc -m IO::Socket
man IO::Socket

likeytom

7^# likeytom 发表于 2008-11-03 16:09

用来做“在线客服”这种对话也行哦。。。