| line |
true |
false |
branch |
|
97
|
3 |
0 |
if $MODULE_USED |
|
100
|
0 |
0 |
unless my $includes = $doc->find('PPI::Statement::Include') |
|
105
|
0 |
1 |
if $File::Find::name =~ m[ / \. [^.] ]x |
|
106
|
0 |
1 |
unless / \.pm \z /x |
|
107
|
0 |
1 |
if not -f -r $_ or -z _ or -B _ |
|
109
|
0 |
1 |
if $SHOW_ACTIVITY |
|
111
|
0 |
1 |
unless my $packages = eval {
do {
$doc->find('PPI::Statement::Package')
}
} |
|
118
|
0 |
1 |
if $File::Find::name =~ m[ / \. [^.] ]x |
|
120
|
1 |
0 |
if (/ \. /x) { } |
|
121
|
0 |
1 |
unless / \. (?: cgi | p[lm] | t ) \z /x |
|
124
|
0 |
0 |
if not -f -r $_ or -z _ or -B _ |
|
126
|
0 |
0 |
unless eval {
do {
first_line($_) =~ m[ \A \#! .* /perl ]x
}
} |
|
129
|
0 |
1 |
if $SHOW_ACTIVITY |
|
130
|
0 |
1 |
unless my(@packages) = eval {
do {
modules_used($_)
}
} |