Branch Coverage

blib/lib/Rose/HTML/Form/Field/TextArea.pm
Criterion Covered Total %
branch 14 18 77.7


line true false branch
46 1 0 if @_
54 17 31 if (@_)
57 12 5 defined $_[0] ? :
83 2 2 if (@_)
87 1 1 if (my($cols, $rows) = /^(\d+)x(\d+)$/) { }
107 2 2 unless $ok
110 0 2 unless defined $value and length $value
114 0 0 unless $self->label
116 1 1 if (defined $maxlength and length $value > $maxlength)