Help for this page
$openStreamsSock{$streamRequest++} = $sock->accept();
while (1) { ... print "$0: Normal timeout of select...\n"; } }