Auf Port 514 lauschen: Ein Anfänger auf Holzwegen... - #37139 (Netzwerkprogrammierung und Netzwerke mit Perl)

Neal_the_real

2006-02-22 11:41

User since
2006-02-21
21 Artikel
BenutzerIn

Hallo smallish,

wenn du UDP Pakete empfangen moechtest dann musst du es dem Socket auch sagen :-)

Type => SOCK_STREAM sagt dem Socket das er Verbindungsorientiertes Protokoll verarbeiten soll. z.B. TCP

Type => SOCK_DGRAM sagt dem Socket das er ein verbindungsloses Protokoll verarbeiten soll. z.B. UDP

Probiers mal so:

Code: (dl )

use strict;
use warnings;
use IO::Socket::INET;

my $socket = IO::Socket::INET -> new( LocalPort => 514,
                                      Proto => 'udp',
                                      Type => SOCK_DGRAM)
or die "Keine Verbindung: $!\n";

my $hello;

$socket->recv($hello, 1024, 0);

print $hello."\n";

close($socket);

--
Gruss Neal

Hier koennte ein schlauer Spruch stehen!