#!/usr/bin/perl BEGIN { $| = 1; $^W = 1; } use Test::More tests => 1; use_ok( 'IO::Socket::Multicast' );