| line |
true |
false |
branch |
|
31
|
4 |
0 |
if ($curr_include ne $updated_include or not scalar @{$modules;})
|
|
44
|
4776 |
6508 |
unless $file =~ /\.pm$/
|
|
49
|
6508 |
32540 |
if $file =~ s[^\Q$path\E/?(?:auto/)?][]
|
|
52
|
0 |
6508 |
unless $valid
|
|
53
|
0 |
6508 |
unless length $file
|
|
58
|
80 |
6428 |
if $mod_package =~ /^_/ or $mod_package =~ /::_/
|
|
78
|
0 |
4 |
if scalar @{$builtin_variables;}
|
|
80
|
4 |
0 |
if (open my $fh, "-|", $perldoc, "-Tu", "perlvar")
|
|
84
|
0 |
0 |
if ($line =~ /=item\s*(C<)?([\$\@\%]\S+)\s*/)
|
|
88
|
0 |
0 |
if length $1
|
|
91
|
0 |
0 |
if $variable =~ /^\$</ and $variable ne "\$<"
|