| line |
true |
false |
branch |
|
37
|
0 |
13 |
unless $mod |
|
39
|
0 |
13 |
if ($mod =~ m[/]) |
|
50
|
3 |
10 |
if ($mod ~~ \@XS_OR_PP_MODULES) |
|
51
|
0 |
3 |
if $debug |
|
55
|
3 |
7 |
if ($mod ~~ \@XS_MODULES) |
|
56
|
0 |
3 |
if $debug |
|
60
|
0 |
7 |
if ($mod ~~ \@PP_MODULES) |
|
61
|
0 |
0 |
if $debug |
|
67
|
7 |
0 |
unless $path |
|
69
|
0 |
0 |
unless (open $fh, '<', $path) |
|
70
|
0 |
0 |
if $warn |
|
75
|
0 |
0 |
if ($line =~ /\.(bs|so|[Dd][Ll][Ll])\z/) |
|
76
|
0 |
0 |
if $debug |
|
80
|
0 |
0 |
if $debug |
|
86
|
1 |
6 |
unless $path |
|
89
|
0 |
6 |
unless (open $fh, '<', $path) |
|
90
|
0 |
0 |
if $warn |
|
94
|
3 |
3 |
if ($content =~ /^\s*(use|require) \s+ (DynaLoader|XSLoader)\b/mx) |
|
95
|
0 |
3 |
if $debug |
|
99
|
0 |
3 |
if $debug |
|
105
|
1 |
0 |
unless ($mod =~ /\.pm\z/) |
|
107
|
0 |
1 |
if ($mod =~ m[/XS\.pm\z|/[^/]+_(xs|XS)\.pm\z]) { } |
|
|
0 |
1 |
elsif ($mod =~ m[/PP\.pm\z|/[^/]+_(pp|PP)\.pm\z]) { } |
|
108
|
0 |
0 |
if $debug |
|
111
|
0 |
0 |
if $debug |
|
116
|
0 |
1 |
if $warn |
|
123
|
1 |
4 |
unless defined $res |
|
124
|
2 |
2 |
unless $res eq 'xs' |
|
130
|
0 |
4 |
unless defined $res |
|
131
|
3 |
1 |
unless $res eq 'pp' |