lib/Perl/PrereqScanner/NotQuiteLite/Parser/Plack.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 12 | 83.3 |
line | true | false | branch |
---|---|---|---|
34 | 0 | 3 | unless my $module = shift @$tokens |
35 | 1 | 2 | if ($module =~ s/^\+//) { } |
47 | 6 | 9 | if $token->[1] eq "COMMA" or ref $token->[0] |
49 | 3 | 3 | if $raw_tokens->[0][1] eq "COMMA" |
53 | 0 | 6 | unless my $module = shift @$tokens |
54 | 2 | 4 | if ($module =~ s/^\+//) { } |