Help for this page
server.pl <--- TCP :7777 --> client.pl <--- readpipe() + ---> client.pl forked child + forking parent $reader + $writer