use Contextual::Return; TestIt->runtests(); package TestIt; use base qw( Test::Class ); use Test::More; sub test : Test(1){ ok(1, 'OK!'); }