| blib/lib/Tangerine/hook/if.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 12 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 5 | 74 | if (&any(sub { $s->[0] eq $_; } , 'use', 'no') and scalar @$s > 3 and $s->[1] eq 'if') |
| 18 | 1 | 4 | $version ? : |
| 22 | 0 | 11 | if $token eq '[' or $token eq '{' or $token eq '(' |
| 23 | 0 | 11 | if $token eq ']' or $token eq '}' or $token eq ')' |
| 24 | 4 | 7 | if $token eq ';' or not $depth and $token eq ',' || $token eq '=>' |
| 28 | 4 | 1 | if ($s->[$index]) |