| 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/^\+//) { } |