This sounds like a chat style application, there are many example around

there is also a good, non-POE, detailed example in "Network Programming with Perl", which would require little change to accomplish what you are trying to do.