The "HELLO" won't be flushed to the file until you write more or close the file handle. You might want to do:
{ my $old= select(OUT); $|= 1; select($old); }
or
use IO::Handle;
...
OUT->autoflush(1);
so that you program hanging on accept() doesn't fool you, for example.
-
tye
(but my friends call me "Tye") |