HI,
I have visited many chatrooms on a specified port(such as 8000).But I have never seen their source codes. Recently,I want to build my chatroom like them with Perl.
I can code Socket with Perl and kown some about HTTP.My idea is:accept requests and save these Sockets in a Handles
-Hash.When sb. want to say to others,I print his saying to
every handles in the Handles-Hash.I set $SIG{PIPE}='IGNORE'
,so that when "print SOCKET" return false or undef I can
say the user has gone and delete the user in User-Hash.
I have no experience on this matter.Is my idea wrong?
I hope I can get some advices from you.
Many Thanks.