Wenn send fehlschlägt, gibt es undef zurück! Siehe
http://perldoc.perl.org/functions/send.html
Bei deinem Programm gibt es auch Warnungen, wenn du keine Bytes sendest!
Sinnvoller wäre:
my $result = $client_socket->send($answer);
warn "$0: close $answer: $!" if not defined $result;
oder:
$client_socket->send($answer) // warn "$0: close $answer: $!"
Was bedeutet denn Absturz?
Zu deiner Fehlermeldung:
https://metacpan.org/source/GBARR/IO-1.25/lib/IO/S...
zZeigt, dass der Peername nicht mehr ermittelt werden kann.
Ich denke die Gegenseite hat einfach das Socket zugemacht.
Last edited: 2016-01-08 13:02:50 +0100 (CET)