The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

MYDan::Multicast - data distribution via multicast

SYNOPSIS

 use MYDan::Multicast;
 
 my $send = MYDan::Multicast ## sender
    ->new( send => '255.0.0.2:8360', iface => 'eth1' );

 $send->send            ## default
 ( 
     '/file/path',
     ttl  => 1,          ## 1
     repeat => 2,        ## 2
     buffer => 4096,     ## MAXBUF
     name => foo,
 );

 my $recv = MYDan::Multicast ## receiver
    ->new( recv => '255.0.0.2:8360', iface => 'eth1' );

 $recv->recv( '/repo/path' );