Perl doesn't do TCP, the system does, and it shouldn't create empty packets to send ACKs if there is data to send (Upd: ...except in that particular instance, according to zek152, to which I'll defer ).