$client_socket->send($answer) // warn "$0: close $answer: $!"