blib/lib/HTML/Form/ListInput.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 44 | 44 | 100.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
36 | 71 | 11 | 4 | $type eq "radio" and delete $self->{'disabled'} |
61 | 15 | 55 | 16 | $type eq "option" and exists $self->{'multiple'} |
85 | 17 | 27 | 11 | $self->{'type'} eq "option" and not exists $self->{'current'} |
125 | 9 | 20 | 50 | defined $val and defined $_->{'value'} |
29 | 31 | 19 | defined $val and defined $_->{'value'} and $val eq $_->{'value'} | |
153 | 1 | 28 | 3 | not defined $cur_ignorecase and $lc_val eq lc $_->{'name'} |
176 | 6 | 19 | 7 | $self->{'strict'} and $disabled |
line | l | !l | condition |
---|---|---|---|
75 | 61 | 9 | $self->{'name'} || \(undef) |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
40 | 2 | 13 | 71 | $self->{'checked'} || $self->{'option_selected'} |
62 | 3 | 3 | 10 | $self->{'disabled'} ||= delete $self->{'option_disabled'} |
95 | 10 | 4 | 32 | $self->{'disabled'} || _menu_all_disabled(@{$$self{'menu'};}) |
125 | 51 | 1 | 8 | defined $val || defined $_->{'value'} |
19 | 8 | 52 | defined $val and defined $_->{'value'} and $val eq $_->{'value'} or not defined $val || defined $_->{'value'} | |
139 | 14 | 7 | 20 | not defined $cur or $disabled |
206 | 4 | 1 | 2 | $_->{'seen'} || $_->{'disabled'} |