filehandle an thread übergeben - #53658 (Allgemeines zu Perl)

Froschpopo

2005-04-09 04:30

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

danke esskar... aber eine Frage hab ich noch...
wenn eine socket nicht gleichzeitig lesen und schreiben kann, warum funktioniert dann das hier:

Code: (dl )

#!/usr/bin/perl


use IO::Socket;

my $server = IO::Socket::INET->new(
    LocalPort => 2006,
    type => SOCK_STREAM,
    Reuse => 1,
    Listen => 10
) or die "Kann nicht an 2006 lauschen\n";

while ($client = $server->accept()) {
    print $client "$client ist die neue Verbindung\n";
}

print "Keine Reaktion";
close($server);

wie man an dem funktionsfähigen Script sehen kann, brauche ich kein neues Socket zu öffnen um eine Nachricht an den Client zurückzuschicken.\n\n