Opened by Froschpopo at 2005-04-09 16:41
User since
2003-08-15
2653 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-15
2653 Artikel
BenutzerIn
Hi,
ich habe eine Socketverbindung aufgebaut.
Der Client (siehe unten) stellt eine Anfrage an den Server und geht danach in eine while-Schleife über in der er dann die Antwort vom Server empfängt.
Jetzt möchte ich jedoch nicht, dass der Client dem Server eine Lesebestätigung sendet.
Ich möchte keine Komplettlösung von euch haben, das wird ja manchmal anscheinend erwartet. Ich möchte nur wissen warum das nicht funktioniert.
ich habe eine Socketverbindung aufgebaut.
Der Client (siehe unten) stellt eine Anfrage an den Server und geht danach in eine while-Schleife über in der er dann die Antwort vom Server empfängt.
Jetzt möchte ich jedoch nicht, dass der Client dem Server eine Lesebestätigung sendet.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#!/usr/bin/perl
use IO::Socket;
my $input = IO::Socket::INET->new (
PeerAddr => '127.0.0.1',
Type => SOCK_STREAM,
PeerPort => 2006,
Proto=>"tcp"
) or die "kann Server nicht kontaktieren\n";
print $input "Frage an den Server\n";
while(<$input>) {
print "Antwort vom Server: $_\n";
print $input "Lesebestätigung senden\n";
}
close($input);
Ich möchte keine Komplettlösung von euch haben, das wird ja manchmal anscheinend erwartet. Ich möchte nur wissen warum das nicht funktioniert.