line |
true |
false |
branch |
19
|
0 |
3 |
if ($^O =~ /^(dos|os2)/i) { } |
|
0 |
3 |
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) ? : |
60
|
8 |
0 |
if ($name =~ /\A\w+(?:::\w+)*\z/) { } |
66
|
3 |
5 |
if exists $INC{$name_pm} |
67
|
1 |
4 |
eval {
do {
_module_source($name_pm);
1
}
} ? : |
74
|
0 |
0 |
if ($name =~ /\A\w+(?:::\w+)*\z/) { } |
86
|
0 |
54 |
unless defined $entry |
89
|
0 |
54 |
if ($ref eq 'ARRAY') { } |
|
0 |
54 |
elsif (UNIVERSAL::can($entry, 'INC')) { } |
|
0 |
54 |
elsif ($ref eq 'CODE') { } |
100
|
1 |
53 |
if (-f $path) |
101
|
0 |
1 |
unless open my $fh, '<', $path |
104
|
0 |
1 |
wantarray ? : |
108
|
0 |
53 |
if ($is_hook) |
109
|
0 |
0 |
unless @hook_res |
110
|
0 |
0 |
if ref $hook_res[0] eq 'SCALAR' |
111
|
0 |
0 |
if ref $hook_res[0] eq 'GLOB' |
112
|
0 |
0 |
if ref $hook_res[0] eq 'CODE' |
113
|
0 |
0 |
if @hook_res |
114
|
0 |
0 |
if ($fh) { } |
|
0 |
0 |
elsif ($code) { } |
119
|
0 |
0 |
if ($code) |
124
|
0 |
0 |
if $prepend_ref |
125
|
0 |
0 |
wantarray ? : |
132
|
0 |
0 |
if $prepend_ref |
133
|
0 |
0 |
wantarray ? : |