| blib/lib/Perl/Critic/Policy/ControlStructures/ProhibitNegativeExpressionsInUnlessAndUntilConditions.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 8 | 9 | 88.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 31 | 30 | 48 | 746 | $token->content ne "until" and $token->content ne "unless" |
| 86 | 1 | 45 | 132 | $element = $element->snext_sibling and $element->content ne $Perl::Critic::Policy::ControlStructures::ProhibitNegativeExpressionsInUnlessAndUntilConditions::SCOLON |
| 112 | 245 | 77 | 0 | $element->isa('PPI::Token::Operator') && $NEGATIVE_OPERATORS{$element} |