#!perl -T use Test::More tests => 5; BEGIN { use_ok( 'WWW::Myspace' ) or print "bail out! WWW::Myspace not compiling\n"; use_ok( 'WWW::Myspace::Message' ); use_ok( 'WWW::Myspace::Comment' ); use_ok( 'WWW::Myspace::FriendChanges' ); use_ok( 'WWW::Myspace::MyBase' ); } diag( "Testing WWW::Myspace $WWW::Myspace::VERSION, Perl $], $^X" );