Select Code to Download

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;
...
    # 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();