Branch Coverage

blib/lib/Data/MuForm/Field/Text.pm
Criterion Covered Total %
branch 15 22 68.1


line true false branch
31 5 37 if $self->size
32 7 35 if $self->maxlength
33 0 42 if $self->minlength
41 0 383 if (ref $input eq 'ARRAY' and not $self->multiple)
42 0 0 if (scalar @$input == 0) { }
0 0 elsif (&all(sub { $_ eq $input->[0]; } , @$input)) { }
57 0 301 unless $self->next::method
60 11 290 if (my $maxlength = $self->maxlength)
61 3 8 if length $value > $maxlength
67 6 292 if (my $minlength = $self->minlength)
68 2 4 if length $value < $minlength