IO::Socket::SSL anstatt IO::Socket::INET - #153006 (Netzwerkprogrammierung und Netzwerke mit Perl)

cohama

2011-10-10 14:52

User since
2011-08-16
102 Artikel
BenutzerIn

user image

Hallo,

vielen Dank für den Hinweis. Soweit funktioniert es richtig gut.

Code: (dl )

$sock = IO::Socket::SSL->new("$host:$port");

Code: (dl )

$sock->print(qq{<Open seq="150" protocolVersion="31" username="$uname" password="$pw"/>\0});

Jetzt hätte ich es gern, dass ich für den Socket ein Timeout-Parameter mit übergebe.

Eine zweite Bitte für mein "Projekt" wäre, dass ich gern die Antwort des Servers in eine Variable speichern möchte.

Code: (dl )

$tmpParameter=$sock->receive(qq{Open seq="150" protocolVersion="31" username="$uname" password="$pw"/>\0})

Diese Nachfrage überschneidet eventuell sich etwas mit einer anderen Hinweis-Nachfrage von mir.