kenmirrors/freeswitch
1
0
Fork 0
mirror of https://github.com/signalwire/freeswitch.git synced 2025-08-13 01:26:58 +00:00
Code Issues Projects Releases Wiki Activity

break everything

Browse Source 
git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@720 d0543943-73ff-0310-b7d9-9358b9ac24b2
This commit is contained in:
Anthony Minessale
2006-03-01 22:55:28 +00:00
parent b77747e0d1
commit 4799ec8b8a
16 changed files with 490 additions and 79 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
scripts/multicast/send.pl
View File

@@ -8,8 +8,10 @@ $ip and $port or die "Usage $0: <ip> <port>\n";
$socket = new IO::Socket::INET->new( PeerPort => $port,
Proto => 'udp',
PeerAddr => $ip);
my $buf = `cat $file`;
open(I, $file);
$/ = undef;
my $buf = <I>;
close(I);
$socket->send("$buf\n");