| line |
true |
false |
branch |
|
25
|
7 |
86 |
if ($type eq 'checkbox') { } |
|
26
|
2 |
5 |
unless defined $value |
|
31
|
5 |
2 |
delete $self->{'checked'} ? : |
|
36
|
4 |
11 |
if $type eq "radio" and delete $self->{'disabled'} |
|
43
|
16 |
70 |
if (exists $self->{'multiple'}) { } |
|
45
|
2 |
14 |
$checked ? : |
|
48
|
13 |
57 |
if $checked |
|
58
|
7 |
86 |
if $type eq "checkbox" |
|
61
|
16 |
55 |
if ($type eq "option" and exists $self->{'multiple'}) |
|
66
|
0 |
70 |
if @{$self->{'menu'};} != 1 |
|
68
|
9 |
61 |
if delete $self->{'option_disabled'} |
|
76
|
32 |
38 |
unless $prev |
|
79
|
4 |
34 |
if exists $self->{'current'} |
|
85
|
11 |
44 |
if ($self->{'type'} eq "option" and not exists $self->{'current'}) |
|
88
|
47 |
8 |
if exists $self->{'current'} |
|
96
|
5 |
41 |
if (@_) |
|
108
|
32 |
6 |
unless $_->{'disabled'} |
|
117
|
92 |
4 |
if exists $self->{'current'} |
|
118
|
0 |
96 |
if exists $self->{'value'} |
|
119
|
41 |
55 |
if (@_) |
|
125
|
27 |
52 |
if (defined $val and defined $_->{'value'} and $val eq $_->{'value'} or not defined $val || defined $_->{'value'}) |
|
135
|
20 |
7 |
unless $disabled |
|
139
|
21 |
20 |
if (not defined $cur or $disabled) |
|
140
|
20 |
1 |
if (defined $val) { } |
|
|
1 |
0 |
elsif ($self->{'strict'}) { } |
|
147
|
35 |
8 |
if (defined $_->{'name'}) |
|
148
|
4 |
31 |
if ($val eq $_->{'name'}) |
|
151
|
3 |
1 |
unless $disabled |
|
153
|
3 |
29 |
if (not defined $cur_ignorecase and $lc_val eq lc $_->{'name'}) |
|
160
|
10 |
10 |
unless (defined $cur) |
|
162
|
2 |
8 |
if (defined $cur) { } |
|
|
8 |
0 |
elsif ($self->{'strict'}) { } |
|
176
|
7 |
25 |
if ($self->{'strict'} and $disabled) |
|
180
|
25 |
0 |
if (defined $cur) { } |
|
214
|
1 |
9 |
unless defined $n |