Leser: 2
![]() |
|< 1 2 >| | ![]() |
17 Einträge, 2 Seiten |
QuoteEs konnte keine Verbindung hergestellt werden, da der Zielcomputer die Verbindung verweigerte
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
my $PId = undef; while ( $new_sock = $sock->accept() ) { if ( defined ( $PId = fork() ) ) { if ( $PId ) { open(DATEI, "> DATEI$$.txt"); while ( defined ( $Data = <$new_sock> ) ) { chomp ( $Data ); print DATEI "Data\n"; } close(DATEI); exit; } } } close ( $sock );
![]() |
|< 1 2 >| | ![]() |
17 Einträge, 2 Seiten |