| blib/lib/Perl/Lint/Policy/BuiltinFunctions/ProhibitStringySplit.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 10 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 55 | 257 | if ($token_type == 70 and $token_data eq 'split') |
| 23 | 28 | 27 | if ($token->{'type'} == 107) |
| 30 | 17 | 38 | if ($token_type == 172 || $token_type == 173 and $token_data ne ' ') { } |
| 18 | 20 | elsif ($token_type == 145 or $token_type == 146) { } | |
| 44 | 12 | 6 | if ($tokens->[$i]{'data'} ne ' ') |