use Test::More tests => 4; BEGIN {use_ok('Mytest')} is( Mytest::is_even(0), 1, 'is_even says 0 is even' ); is( Mytest::is_even(1), 0, 'is_even says 1 is not even' ); is( Mytest::is_even(2), 1, 'is_even says 2 is even' );