while (defined(my $conn = $socket->accept)) {