Branch Coverage

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


line true false branch
49 1 0 if @_
57 17 31 if (@_)
60 12 5 defined $_[0] ? :
86 2 2 if (@_)
90 1 1 if (my($cols, $rows) = /^(\d+)x(\d+)$/) { }
110 2 2 unless $ok
113 0 2 unless defined $value and length $value
117 0 0 unless $self->label
119 1 1 if (defined $maxlength and length $value > $maxlength)