package Parent;
use Moose;
use Test::Most tests => 1, '-Test::Deep';

sub BUILD {
    my ( $self, $args ) = @_;
    if ( $args->{'tests'} ) {
        plan tests => $args->{'tests'};
    }
}

package Child;
use Moose;
use Test::Most '-Test::Deep';
extends qw(Parent);

sub run {
    my ($self) = @_;
    ok( 1, 'simple test' );
}

__PACKAGE__->new->run;
[download]