| blib/lib/Perl/Lint/Policy/ValuesAndExpressions/ProhibitLeadingZeros.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 10 | 11 | 90.9 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 25 | 109 | 217 | 10 | not $is_strict and $token_type == 70 |
| 95 | 109 | 214 | 3 | not $is_strict and $token_type == 122 |
| 126 | 3 | 4 | 30 | $int =~ /\A-?0/ and (eval $int // 0) != 0 |
| line | l | !l | condition |
|---|---|---|---|
| 126 | 34 | 0 | eval $int // 0 |