Help for this page
my $new_sock = $sock->accept(); while (my $storage = <$new_sock>) { ... $new_sock = $sock->accept(); } close($sock);