| blib/lib/Perl/Critic/Policy/ControlStructures/ProhibitInlineDo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 22 | 81.8 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 0 | 7 | unless @ll |
| 30 | 0 | 7 | unless @rr |
| 36 | 1 | 32 | unless ($elem->isa("PPI::Token::Word")) |
| 37 | 9 | 23 | unless (is_perl_bareword($elem)) |
| 38 | 1 | 22 | if (is_method_call($elem)) |
| 39 | 8 | 14 | if ($elem->content ne "do") |
| 42 | 4 | 10 | unless ($next and $next->isa("PPI::Structure::Block")) |
| 45 | 0 | 10 | unless ($parent) |
| 46 | 3 | 7 | if ($parent->isa("PPI::Statement::Sub")) |
| 47 | 7 | 0 | if ($parent->isa("PPI::Statement")) |
| 49 | 3 | 4 | if (0 == _cmpLocation($elem, $token)) |