Schrift
Start · Board · Anwendungen/Programme/Skripte in Perl · Netzwerkprogrammierung und Netzwerke mit Perl
[thread]4408[/thread]

Auf Port 514 lauschen: Ein Anfänger auf Holzwegen... (Seite 2)



<< |< 1 2 >| >> 16 Einträge, 2 Seiten
Neal_the_real
 2006-02-22 11:41
#37139 #37139
User since
2006-02-21
21 Artikel
BenutzerIn
[Homepage] [default_avatar]
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 )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
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!
smallish
 2006-02-22 14:11
#37140 #37140
User since
2005-10-13
28 Artikel
BenutzerIn
[default_avatar]
Danke! Funktioniert jetzt bestens!

Ihr seit einfach super! Tut mir leid solche Umstände gemacht zu haben.

Einen schönen Tag noch!!
betterworld
 2006-02-22 20:50
#37141 #37141
User since
2003-08-21
2613 Artikel
ModeratorIn

user image
Zeig doch jetzt mal den Code...

Ich verstehe jetzt noch nicht ganz, ob es ohne "Type" bei dir funktioniert oder nicht.
Lieblingsmodule: CPAN:IPC::System::Simple, CPAN:Path::Class
smallish
 2006-02-22 23:31
#37142 #37142
User since
2005-10-13
28 Artikel
BenutzerIn
[default_avatar]
[quote=Neal_the_real,22.02.2006, 10:41]

Probiers mal so:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
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);
[/quote]
So sieht er aus.

NACHTRAG: Funktioniert auch ohne die angabe von Type\n\n

<!--EDIT|smallish|1140644495-->
esskar
 2006-02-22 23:56
#37143 #37143
User since
2003-08-04
7321 Artikel
ModeratorIn

user image
[quote=betterworld,22.02.2006, 04:45][quote=esskar,21.02.2006, 19:52]Ist ja ecklig![/quote]
So wie "Packete" auch ;-)[/quote]
saarländicher Ausdruck! 8)
dominicn
 2006-02-23 00:59
#37144 #37144
User since
2003-08-08
327 Artikel
BenutzerIn
[default_avatar]
[quote=esskar,22.02.2006, 22:56]saarländicher Ausdruck! 8)[/quote]
*gg*
<< |< 1 2 >| >> 16 Einträge, 2 Seiten



View all threads created 2006-02-21 20:18.