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/) { }
|