package Bar; use Test::More; use lib '.'; use base 'Foo'; sub setup : Tests(setup => 1) { ok 1, 'Bar: should be called second'; } sub some_test : Tests(1) { ok 1, 'Bar: some test'; } 1;