This commit is contained in:
Anthony Minessale
2010-04-07 01:44:56 -05:00
parent ec8ab06c66
commit 7095887bad
2 changed files with 1 additions and 2 deletions

View File

@@ -8,6 +8,5 @@ my $socket = IO::Socket::Multicast->new( LocalPort => $port, ReuseAddr => 1 );
$socket->mcast_add($ip);
while($socket->recv($data,1024)) {
$data =~ s/^.{8}//;
print $data;
}