| blib/lib/Perl/Lint/Policy/RegularExpressions/ProhibitUselessTopic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 10 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 37 | 407 | if ($token_type == 137) |
| 20 | 0 | 37 | unless $token = $$tokens[++$i] |
| 23 | 35 | 2 | if ($token_type == 35 or $token_type == 36) |
| 24 | 0 | 35 | unless $token = $$tokens[++$i] |
| 27 | 30 | 5 | if ($token_type != 166 and $token_type != 194) |