Branch Coverage

File:lib/Parrot/Configure/Options/Test/Prepare.pm
Coverage:83.3%

line%coveragebranch
5150TFunless opendir my $DIRH, $config_dir
5550TFunless closedir $DIRH
66100TFif ($File::Find::name =~ m[ (init|inter|auto|gen) # category / ([a-z_\d]+) # class (?:/ ([a-z_]+) # second-level )? # may not be defined - (\d{2}) # number \.t$ ]x)
81100TF$secondlevel ? :
100100TFunless my $these_tests = $$steps_tests_ref{$module_path[0]}{$module_path[1]}
103100TFif ($k =~ /^(\w+)-(\d{2})$/) { }