lib/Perl/PrereqScanner/NotQuiteLite/Parser/PackageVariant.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 16 | 21 | 76.1 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
19 | 3 | 13 | 5 | ref $token and $token->[0] eq "importing" |
3 | 2 | 11 | ref $token and not ref $token->[0] | |
5 | 7 | 4 | ref $token and not ref $token->[0] and $token->[1] eq "WORD" | |
20 | 0 | 0 | 5 | @$tokens and $tokens->[0][1] eq "COMMA" |
53 | 0 | 0 | 4 | @$tokens and $tokens->[0][1] eq "COMMA" |
56 | 7 | 0 | 14 | @$tokens and ref $tokens->[0] |
7 | 6 | 8 | @$tokens and ref $tokens->[0] and $tokens->[0][1] eq "COMMA" |