line |
true |
false |
branch |
19
|
0 |
5 |
if ($^O =~ /^(dos|os2)/i) { } |
|
0 |
5 |
elsif ($^O =~ /^MacOS/i) { } |
31
|
1 |
1 |
$ENV{'MI_TEST_PPI'} ? : |
33
|
1 |
1 |
unless (-f $file) |
37
|
1 |
0 |
unless (module_installed($PPI)) |
50
|
0 |
0 |
module_installed($_->module, $cb) ? : |
60
|
15 |
0 |
if ($name =~ /\A\w+(?:::\w+)*\z/) { } |
68
|
2 |
7 |
eval {
do {
_module_source($name_pm);
1
}
} ? : |
|
6 |
9 |
if (exists $INC{$name_pm}) { } |
|
2 |
7 |
elsif (eval {
do {
_module_source($name_pm);
1
}
} ? 1 : 0) { } |
75
|
6 |
9 |
if (defined $sub) |
76
|
1 |
5 |
if (ref $sub ne 'CODE') |
89
|
0 |
0 |
if ($name =~ /\A\w+(?:::\w+)*\z/) { } |
101
|
0 |
97 |
unless defined $entry |
104
|
0 |
97 |
if ($ref eq 'ARRAY') { } |
|
0 |
97 |
elsif (UNIVERSAL::can($entry, 'INC')) { } |
|
0 |
97 |
elsif ($ref eq 'CODE') { } |
115
|
2 |
95 |
if (-f $path) |
116
|
0 |
2 |
unless open my $fh, '<', $path |
119
|
0 |
2 |
wantarray ? : |
123
|
0 |
95 |
if ($is_hook) |
124
|
0 |
0 |
unless @hook_res |
125
|
0 |
0 |
if ref $hook_res[0] eq 'SCALAR' |
126
|
0 |
0 |
if ref $hook_res[0] eq 'GLOB' |
127
|
0 |
0 |
if ref $hook_res[0] eq 'CODE' |
128
|
0 |
0 |
if @hook_res |
129
|
0 |
0 |
if ($fh) { } |
|
0 |
0 |
elsif ($code) { } |
134
|
0 |
0 |
if ($code) |
139
|
0 |
0 |
if $prepend_ref |
140
|
0 |
0 |
wantarray ? : |
147
|
0 |
0 |
if $prepend_ref |
148
|
0 |
0 |
wantarray ? : |