Branch Coverage

inc/Test/Requires.pm
Criterion Covered Total %
branch 11 22 50.0


line true false branch
19 70 45 if (@_ == 1 and ref $_[0] and ref $_[0] eq 'HASH') { }
32 0 115 if $mod eq "Test::Requires"
33 0 115 if (@_ != 3)
39 22 93 if (my $e = $@)
43 22 0 if (not defined $builder->has_plan) { }
0 0 elsif ($builder->has_plan eq 'no_plan') { }
47 0 0 if ($builder->can("parent") and $builder->parent)
55 0 0 if ($builder->can("parent") and $builder->parent)
61 21 1 if ($e =~ /^Can't locate/) { }
0 1 elsif ($e =~ /^Perl (\S+) required/) { }
1 0 elsif ($e =~ /^\Q$mod\E version (\S+) required/) { }