NAME

Padre::Swarm::Transport::Multicast

SYNOPSIS

  my $transport = Padre::Swarm::Transport::Multicast->new();
  $transport->subscribe_channel( 20000 ) or die $!;
  $transport->subscribe_channel( 22000 ) or die $!;
  
  $transport->start;
  if ( $transport->started ) {
      $transport->tell_channel( 22000, 'Hello World!' );
  }
  
  foreach my $channel ( $transport->poll ) {
      my $payload = $transport->receive_from( $channel );
      # do something exciting w/ $payload
   };
  
  $transport->unsubscribe_channel( 20000 );
  $transport->shutdown;
  

METHODS

start

shutdown

started

subscribe_channel

unsubscribe_channel

poll

receive_from

tell_channel