Branch Coverage

blib/lib/HTML/Form/Input.pm
Criterion Covered Total %
branch 34 54 62.9


line true false branch
24 8 2 if (@_)
39 1 233 if @_
46 0 1 if @_
53 0 1 if @_
59 0 580 unless defined $sel
60 14 540 $sel =~ s/^\.// ? :
20 554 $sel =~ s/^#// ? :
6 574 $sel =~ s/^\^// ? :
65 5 575 unless defined $self->{$attr}
72 1 10 if @_
79 2 4 if @_
98 1 5 if @_
105 1 59 if @_
112 8 68 unless defined $name
113 3 65 if $self->disabled
115 5 60 unless defined $value
122 0 1 unless defined $name
124 0 1 unless defined $value
129 0 1 if $self->disabled
130 0 1 if $self->readonly
131 1 0 unless $self->{'menu'}
137 0 0 unless defined $opt
139 0 0 if defined $_->{'name'} and length $_->{'name'} and $_->{'name'} ne $opt
140 0 0 if $_->{'disabled'}
141 0 0 if (exists $self->{'current'} and $self->{'current'} == $i) { }
142 0 0 unless $_->{'seen'}
146 0 0 if $_->{'seen'}