| blib/lib/Perl/Lint/Policy/Subroutines/ProhibitAmpersandSigils.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 18 | 94.4 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 24 | 205 | if ($token_type == 15) { } |
| 15 | 190 | elsif ($token_type == 122 or $token_type == 70 or $token_type == 85) { } | |
| 8 | 182 | elsif ($token_type == 10) { } | |
| 25 | 157 | elsif ($token_type == 107) { } | |
| 25 | 132 | elsif ($token_type == 108) { } | |
| 24 | 8 | 0 | if ($next_token_type == 122 or $next_token_type == 127 or $next_token_type == 126) |
| 29 | 14 | 3 | unless ($is_before_token_function or $is_in_ref) |
| 52 | 22 | 3 | if ($left_paren_num <= 0) |
| 57 | 104 | 28 | if ($left_paren_num <= 0) |