1 2 3 4 5 6 7 8 9
#!perl -T use Test::More tests => 1; BEGIN { use_ok( 'Graphics::Primitive' ); } diag( "Testing Graphics::Primitive $Graphics::Primitive::VERSION, Perl $], $^X" );