sysread( $new_sock, $sres, 1024, length($sres) )  would be more efficient (see sysread).

Ok I follow your suggestion

Why are you chomping if you aren't sending newlines?

Ok.. it was an old statement used in some elder test , I removed it now

Why are you exiting your loop if 1/10th of second passes with no input? Shouldn't you exit when you reach end-of-file instead?
Why use select if you don't have anything asychronous to do? Just read until EOF, no?

Both OK, in previous attempt I got the messages hang , waiting for more data, so I include the select statement.

Now I tried without select and the test program still wotks well.

In have to check if in the real program all this is still good, and the apply your suggestions also on it.

thanks.