pseudo code in client
Assume ip1,ip2,ip3..so on are already connected sock.
Added each of the socket to IO::Select
while(1)
{
  (@ready)= IO::Select->select($selector,undef,undef);
   proceed with received reponse from services.
}