sub setup : Tests(setup => 1) { my $test = shift; $test->SUPER::setup; ok 1, 'Bar: should be called second'; }