| blib/lib/Getopt/O2.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 33 | 42 | 78.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 45 | 1 | 1 | 44 | defined $arg && length $arg |
| 82 | 1 | 1 | 1 | defined $rule and $rule->negatable |
| 117 | 9 | 8 | 5 | $rule->is_list and not defined $self->{'options'}{$rule->long} |
| 140 | 2 | 3 | 1 | $rule->keep_unique and $arg ~~ \@{$self->{'options'}{$rule->long};} |
| 194 | 1 | 1 | 21 | defined $value && length $value |
| 508 | 0 | 2 | 0 | $show_default and defined $self->{'default'} |
| 515 | 0 | 1 | 0 | $show_default && defined $self->{'default'} |
| line | l | !l | condition |
|---|---|---|---|
| 441 | 4 | 53 | $options{'negatable'} // 0 |
| 449 | 0 | 6 | $options{'keep_unique'} // 1 |
| 465 | 0 | 56 | $rule{'required'} //= 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 45 | 2 | 1 | 43 | not defined $arg && length $arg or '-' eq $arg |
| 3 | 2 | 41 | not defined $arg && length $arg or '-' eq $arg or not $arg =~ /^-/ | |
| 194 | 2 | 1 | 20 | not defined $value && length $value or '-' eq $value |
| 3 | 20 | 0 | not defined $value && length $value or '-' eq $value or not $value =~ /^-/ | |
| 364 | 0 | 0 | 13 | $have_required ||= $rule->required |