Hell-O!
ich habe ein kleines Benchmark Skript für einen Dienst auf meinem Server geschrieben. Dieses empfängt zunächst den hello vom Server und gibt ihn aus. Danach sendet es 100 newline-terminierte Zeichenketten ... Allerdings ist der Reconnect sehr langsam. (ca. 1s pro Schleife)
Welche, die for-Schleife?
$socket = IO::Socket::INET->new("$server:$port")
or die "Connection failed. $!\n";
Sieht ungewöhnlich aus, welche Version von IO::Socket verwendest du? Wie sind die Optionen gesetzt, insbesondere "Proto", "Type" und "Timeout"? Falls es eine etwas antiquierte Version sein sollte, könnte eventuell ein $socket->autoflush(1) helfen (in neueren Versionen ist das IIRC standardmäßig aktiviert).
Mehr fällt mir aber leider auch nicht ein :-)
Siechfred
Hier könnte Ihre Werbung stehen.
Die schlechtesten Cover aus dem Bereich Hard and Heavy || Schöne Wörter, Teil 1