| line |
true |
false |
branch |
|
40
|
315 |
315 |
/\D/ ? : |
|
|
0 |
63 |
unless "PPI::Normal"->register(map({/\D/ ? "PPI::Normal::Standard::$_" : $_;} @METHODS)) |
|
79
|
15 |
0 |
unless $_[1]->isa("PPI::Statement::Include") |
|
80
|
0 |
0 |
if $_[1]->version |
|
81
|
0 |
0 |
if $$remove_pragma{$_[1]->pragma} |
|
90
|
12 |
3 |
unless $_[1]->isa("PPI::Token::Structure") |
|
91
|
0 |
3 |
unless $_[1]->content eq ";" |
|
92
|
0 |
3 |
unless my $stmt = $_[1]->parent |
|
93
|
0 |
3 |
unless $stmt->isa("PPI::Statement") |
|
94
|
0 |
3 |
if $_[1]->next_sibling |
|
105
|
8 |
4 |
unless $_[1]->isa("PPI::Token::Word") |
|
106
|
4 |
0 |
unless $_[1]->content eq "return" |
|
107
|
0 |
0 |
unless my $stmt = $_[1]->parent |
|
108
|
0 |
0 |
unless $stmt->isa("PPI::Statement::Break") |
|
109
|
0 |
0 |
unless $stmt->children == 2 |
|
110
|
0 |
0 |
if $stmt->next_sibling |
|
111
|
0 |
0 |
unless my $block = $stmt->parent |
|
112
|
0 |
0 |
unless $block->isa("PPI::Structure::Block") |