Ich programmiere einen einfachen Code mit Socket-Verbindung in Perl:
%Vor%Dann Daten mit einer Schleife senden:
%Vor%Gibt es eine Möglichkeit, einen Befehl in die Schleife einzufügen, um die Verbindung zu überprüfen? Etwas wie:
%Vor%BEARBEITEN MEIN CODE HINZUFÜGEN:
%Vor% IO :: Socket :: INET ist eine Unterklasse von IO::Socket , mit einem connected Methode .
Wenn sich der Socket in einem verbundenen Zustand befindet, wird die Peer-Adresse zurückgegeben. Wenn der Socket nicht verbunden ist, wird Undef zurückgegeben.
Sie können das in Ihrer Schleife verwenden und rufen Sie connect darauf auf, wenn die Überprüfung% zurückgegeben hat. co_de%.