package My::Test;
use base qw( Test::Class );
use Test::More;

sub before :Test( startup ) {
    warn "before all tests\n";
};

sub first :Test { pass };

sub second :Test { pass };

sub after :Test( shutdown ) {
    warn "after all tests\n";
};