CGI/Perl Guide | Learning Center | Forums | Advertise | Login
Site Search: in

  Main Index MAIN
INDEX
Search Posts SEARCH
POSTS
Who's Online WHO'S
ONLINE
Log in LOG
IN

Home: Perl Programming Help: Intermediate:
Simple IPv6 multicast server won't work

 



sune_ahlgren
New User

Apr 2, 2009, 7:50 AM

Post #1 of 1 (322 views)
Simple IPv6 multicast server won't work Can't Post

Hi all!

Why don't these 15 lines of server code catch IPv6 multicast messages?

I have no clue... Anyone?

#!/usr/bin/perl
use strict;
use warnings;
use IO::Socket::Multicast6;

my $MAX_LEN=65535;
my ($server, $recv);

my $s6 = IO::Socket::Multicast6->new(Domain=>AF_INET6,
LocalAddress=>'FF02::C',
LocalPort=>3702);

# Add a multicast group to eth1 device
$s6->mcast_add('FF02::C');

# now receive some multicast data
$s6->recv($recv,$MAX_LEN);
print "$recv\n";

# Drop a multicast group
$s6->mcast_drop('FF02::C');

 
 


Search for (options) Powered by Gossamer Forum v.1.2.0

Web Applications & Managed Hosting Powered by Gossamer Threads
Visit our Mailing List Archives