| blib/lib/Perl/Critic/Policy/Community/WhileDiamondDefaultAssignment.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 12 | 17 | 70.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 37 | 0 | 4 | 4 | $middle->schildren and $middle->schild(0)->isa("PPI::Token::QuoteLike::Readline") |
| 43 | 0 | 0 | 24 | defined $next and $next->isa("PPI::Statement") |
| 49 | 10 | 10 | 20 | $next->isa("PPI::Token::Word") and exists $bad_functions{$next} |
| 10 | 0 | 20 | $next->isa("PPI::Token::Word") and exists $bad_functions{$next} and is_function_call($next) |
| line | l | !l | condition |
|---|---|---|---|
| 29 | 56 | 0 | $elem->snext_sibling || (return ()) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 27 | 48 | 8 | 54 | $elem eq "while" or $elem eq "for" |