NAME

udp_proxy - Perl binding for udpxy

SYNOPSIS

  use udp_proxy;

  my $uph = new udp_proxy( {
      interface => 'eth0',
      log     => 'udp_proxy.log',     # or \*LOG, or $fh, or *LOG
      handle  => 'stream.ts',         # like log, but default to stdout if not set.
  } );
  $uph->do_relay( 'rtp', '233.33.210.86', 5050 );

DESCRIPTION

This module binds some udpxy functional to perl. It is possible to record or transfer unscrambled multicast traffic.

METHODS

my $uph = new udp_proxy( %args );

Method new creates object udp_proxy with some parameters: - interface - interface on which object should receive multicast traffic - log - filehandle or filename of log file. - handle - filehandle or filename for writing MPEG-TS packets.

$uph->do_relay( $command, $host, $port );

Method that actualy do the work. Writing data to STDOUT or speciefied handle. $command - possible values 'rtp' or 'udp' $host - multicast host to which object should join $port - port on which transmission is going.

EXPORT

None by default.

SEE ALSO

IO::Socket::Multicast

AUTHOR

Pavel V. Cherenkov, <pcherenkov@gmail.com>

COPYRIGHT AND LICENSE

Copyright (C) 2008-2011 by Pavel V. Cherenkov

This library is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.