C:\Temp>perl -w deleteme.pl
Created local TCP socket on port 1861
Parent live
Child live
Handles: 1, 1 ready
[r]
[d:HELLO!:d]
[W]
Handles: 1, undef ready
[b]
Handles: 1, undef ready
[b]
Handles: 1, undef ready
[b]
Handles: 1, 1 ready
[r]
[d:HELLO!:d]
[W]