Socket gleichzeitig lesen und beschreiben (Allgemeines zu Perl)

[thread]6879[/thread]

Socket gleichzeitig lesen und beschreiben

Froschpopo

2005-04-09 16:41

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

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.

Code: (dl )

#!/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.

steffenw

2005-04-10 00:51

User since
2003-08-15
692 Artikel
BenutzerIn

Ich denke mal, Dein Problem ist, daß Du nichts vom Server empfängst. Ob da überhaupt etwas anliegt, kannst Du sehr gut testen, wenn Du mit IO::Select arbeitest, bevor Du in die while-Schleife eintauchst. Denn es könnte ja auch ein Problem beim Server vorliegen, mit dem Du verbunden bist. Wenn Du vom Server getrennt wirst, müßtest Du automatisch aus Deiner while-Schleife austreten.

$SIG{USER} = sub {love 'Perl' or die};

GwenDragon

2005-04-10 01:20

User since
2005-01-17
14761 Artikel
Admin1

Wieso wird im Forum sowohl hier als auch unter http://board.perl-community.de/cgi-bin....1;#idx1 zum Problem mit den Sockets diskutiert? Doppelposting?

die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

sri

2005-04-10 01:27

User since
2004-01-29
828 Artikel
BenutzerIn

Die ganze Geschichte geht schon ueber viel mehr Threads...aber der Frosch macht immer weiter...die meisten von uns sind schon ausgestiegen und antworten einfach nicht mehr...

http://mojolicio.us/

GwenDragon

2005-04-10 01:51

User since
2005-01-17
14761 Artikel
Admin1

Wenn der Frosch seinen Hintern in so viel Threads hält, wird er wohl etwas Ungeduld produzieren und vielleicht bald keine Antworten mehr bekommen. :-)
Ich könnte schon wegen des Froschh*** ein Support Center aufbauen - gegen 01805 versteht sich ;)\n\n

die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2005-04-09 16:41.