| line |
true |
false |
branch |
|
36
|
5 |
80 |
if ($_[1]->isa('PPI::Statement::Package')) |
|
37
|
5 |
0 |
if (my $ns = $_[1]->namespace) |
|
39
|
4 |
1 |
unless exists $pkg{$line_no} |
|
54
|
1 |
0 |
if ($$iro{'ppi_document'}->find_any('PPI::Statement::Include')) |
|
57
|
21 |
0 |
if ($_[1]->isa('PPI::Statement::Include') and not $_[1]->pragma and $_[1]->module and $_[1]->type eq 'use') |
|
64
|
0 |
1 |
if ref $inc_nodes ne 'ARRAY' |
|
71
|
52 |
53 |
if ($line_num <= $ppi_inc->line_number) |
|
72
|
1 |
51 |
if ($line_num == $ppi_inc->line_number) { } |
|
74
|
1 |
1 |
if ($$ns_hr{'column_number'} < $ppi_inc->column_number) |
|
96
|
5 |
16 |
if (not defined $ppi_inc->arguments) { } |
|
110
|
13 |
3 |
unless ($list =~ /^\s*\(/) |
|
117
|
13 |
3 |
if (@list) |
|
128
|
7 |
6 |
if (grep m[^[!:/]], @list) |
|
143
|
4 |
9 |
if ($ent =~ /^\!(.*)/) |
|
150
|
2 |
11 |
if (substr($symbol, 0, 1) eq ':') { } |
|
|
3 |
8 |
elsif (ref $symbol eq 'Regexp' or substr($symbol, 0, 1) eq '/') { } |
|
151
|
2 |
0 |
if (exists ${"${module}::EXPORT_TAGS";}{$symbol}) { } |
|
157
|
0 |
0 |
if (exists ${"${module}::EXPORT_TAGS";}{$copy}) |
|
165
|
3 |
0 |
if (ref $symbol ne 'Regexp') |
|
173
|
0 |
0 |
$_ =~ /$qr/ ? : |
|
180
|
4 |
9 |
if ($remove) { } |
|
183
|
2 |
5 |
exists $remove{$_} ? : |