The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package My::Test::Class::Child;

use Test::Class::Most
  parent      => 'My::Test::Class',
  is_abstract => 1,
  attributes  => 'child1';

sub startup : Tests(startup) {
    my $test = shift;
    $test->SUPER::startup;
    $test->child1('from child1');
}

sub parent {
    ['My::Test::Class'];
}

1;