| blib/lib/Mojo/Bass.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 14 | 92.8 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 4 | 13 | unless my(@flags) = @_ |
| 19 | 4 | 9 | if ($flags[0] eq '-base') { } |
| 5 | 4 | elsif ($flags[0] eq '-strict') { } | |
| 1 | 3 | elsif (my $file = $flags[0] and not $flags[0]->can('new')) { } | |
| 35 | 1 | 12 | if (($flags[1] || '') eq '-signatures') |
| 36 | 0 | 1 | if $] < 5.02 |
| 42 | 8 | 5 | if ($flags[0]) |