Branch Coverage

blib/lib/Test/Builder/SubtestSelection.pm

Criterion	Covered	Total	%
branch	4	4	100.0

line	true	false	branch
33	9	4	if (defined $self->parent or not @subtest_selection or grep {/\A [1-9]\d* \z/x ? $current_test == $_ : $name =~ /$_/;} @subtest_selection) { }
36	6	6	/\A [1-9]\d* \z/x ? :