Branch Coverage

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


line true false branch
19 60 44 if (@_ == 1 and ref $_[0] and ref $_[0] eq 'HASH') { }
32 0 104 if $mod eq "Test::Requires"
33 0 104 if (@_ != 3)
39 60 44 if (my $e = $@)
43 60 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 59 1 if ($e =~ /^Can't locate/) { }
0 1 elsif ($e =~ /^Perl (\S+) required/) { }
1 0 elsif ($e =~ /^\Q$mod\E version (\S+) required/) { }