| blib/lib/Perinci/Sub/GetArgs/Array.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 18 | 77.7 |
| line | true | false | branch |
|---|---|---|---|
| 83 | 0 | 11 | unless my $ary = $fargs{'array'} |
| 84 | 0 | 11 | unless my $meta = $fargs{'meta'} |
| 85 | 11 | 0 | unless ($fargs{'meta_is_normalized'}) |
| 99 | 13 | 28 | if (defined $o and $o == $i) |
| 100 | 5 | 8 | if ($as->{'greedy'}) { } |
| 103 | 2 | 3 | if ($type eq 'array') { } |
| 2 | 1 | elsif ($type eq 'hash') { } | |
| 109 | 0 | 6 | unless ($elem =~ /(.*?)=(.*)/) |
| 126 | 1 | 10 | if @$ary and not $allow_extra_elems |