Thread filehandle an thread übergeben (20 answers)
Opened by Froschpopo at 2005-04-08 21:38

Froschpopo
 2005-04-08 21:50
#53648 #53648
User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]
das ist leider nicht möglich, weil der Vaterprozess an denselben Socket schreiben können soll.
Es müsste so funktionieren:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#!/usr/bin/perl

use IO::Socket;
use threads;
use threads::shared;

my $socket = IO::Socket::INET->new (
    PeerAddr => '127.0.0.1',
    Type => SOCK_STREAM,
    PeerPort => 2005,
    Proto=>"tcp"
);


my $t = threads->create( \&start_socket);

sub start_socket {
    while (<$socket>) {
        print "$_\n"; # Antwort vom Server ausgeben
    }
}

print "Elternprozess arbeitez ungestört weiter\n";
\n\n

<!--EDIT|Froschpopo|1112982691-->

View full thread filehandle an thread übergeben