Thread send: Cannot determine peer address :(
(4 answers)
Opened by RPerl at 2007-08-13 17:16
Hi Leuts :)
Ich hab mal wieder ein Problem und zwar bekomm ich immer folgenden Fehler: Quote bei folgendem code: Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 sub listener{ my ($ip, $port) = @_; my ($sock, $tmp); #print "ip is -> ".$ip."\n"; #print "port is ->".$port."\n"; $sock = IO::Socket::INET->new(Listen => 100, LocalAddr => $ip, LocalPort => $port, Proto => 'tcp') || die "Can't set up the listener -> $@\n"; while ($tmp = $sock->accept()) { $sock->send("Hallo dort! :)"); } } Ich will, dass der client der connected "Hallo dort! :)" auf den Bildschirm gedruckt bekommt. Spaeter will ich dann einige Befehle erlauben. (reboot u.a.) Vielleicht hat jemand 'n bisschen Zeit uebrig mal drueber zu gucken :) Vielen Dank schon mal vorab. Gruß, rperl |