| blib/lib/Getopt/Guided.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 16 | 16 | 100.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 70 | 5 | 1 | 57 | defined $offset and $offset == length $spec |
| 72 | 29 | 27 | 1 | defined $spec_length_expected and $spec_length_got != $spec_length_expected |
| 90 | 29 | 6 | 123 | @$argv and my($name, $rest) = $argv->[0] =~ /\A ${\"-";} (.) (.*)/ox |
| 189 | 10 | 1 | 1 | $dest_ref_type eq "ARRAY" and $indicator eq "," |
| line | l | !l | condition |
|---|---|---|---|
| 166 | 2 | 1 | caller 1 // "main" |
| 199 | 9 | 1 | &$dest($value, $name, $indicator) // "" |