use Test::More 'no_plan'; eval "require My::Module; My::Module->import()"; # test behaviors without INIT/CHECK #### # t/Test/BehaviorA.pm package t::Test::BehaviorA; use base 'Exporter'; use vars qw(@EXPORT); @EXPORT = qw( run_tests_for_A ); use Test::More tests => 42; sub run_tests_for_A { # put 42 tests for Behavior A here } 1; # need this #### # 01-test-A-normal.t use t::Test::BehaviorA qw( run_tests_for_A ); use My::Module; run_tests_for_A(); #### # 01-test-A-persistant.t use t::Test::BehaviorA qw( run_tests_for_A ); eval "require My::Module; My::Module->import()"; run_tests_for_A();