Condition Coverage

blib/lib/TUWF/Misc.pm
Criterion Covered Total %
condition 43 51 84.3


and 3 conditions

line !l l&&!r l&&r condition
30 8 1 4 defined $_[1]{'min'} and $_[0] < $_[1]{'min'}
31 5 1 3 defined $_[1]{'max'} and $_[0] > $_[1]{'max'}
80 87 3 2 $f->{'mincount'} and @values < $f->{'mincount'}
81 87 3 2 $f->{'maxcount'} and @values > $f->{'maxcount'}
111 15 7 75 $v and $r->{'rmwhitespace'}
133 87 68 0 $r->{'template'} and not $$t{$r->{'template'}}
136 150 3 2 $r->{'minlength'} and length $v < $r->{'minlength'}
137 117 33 3 $r->{'maxlength'} and length $v > $r->{'maxlength'}
139 147 2 1 $r->{'enum'} and not grep(($_ eq $v), @{$$r{'enum'};})
141 96 30 23 $r->{'regex'} and ref $r->{'regex'} eq 'ARRAY' ? !($v =~ /$r->{'regex'}[0]/i) : !($v =~ /$r->{'regex'}/)
149 77 9 10 $r->{'func'} and ref $r->{'func'} eq 'ARRAY' ? !$r->{'func'}[0]->($_[0], $r) : !$r->{'func'}->($_[0], $r)

or 2 conditions

line l !l condition
64 18 534 exists $f->{$_} or _val_from_tpl($f, $_, $templates, $f)
166 0 0 $self->{'_TUWF'}{'validate_templates'} || {}
180 0 0 $hs{'Content-Type'} ||= q[text/plain; charset='UTF-8']

or 3 conditions

line l !l&&r !l&&!r condition
72 9 39 49 _validate_early($_, $f) || _validate($_, $templates, $f)
73 49 3 45 not $errfield or $errfield eq 'default'
119 3 6 88 not defined $v or length $v < 1
181 0 0 0 $hs{'From'} ||= $self->{'_TUWF'}{'mail_from'}