| blib/lib/Perl/Lint/Policy/ValuesAndExpressions/ProhibitNoisyQuotes.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 6 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 39 | 195 | if ($token_type == 172 or $token_type == 173) |
| 21 | 8 | 31 | if ($token_data =~ /\A[^\w(){}[\]<>]{1,2}\Z/) |
| 33 | 1 | 194 | if ($token_type == 94 and $token_data eq 'overload') |