Condition Coverage

lib/CGI/FormBuilder/Util.pm
Criterion Covered Total %
condition 55 85 64.7


and 3 conditions

line !l l&&!r l&&r condition
246 5177 0 129 $key eq 'text' and $name ne 'body'
5115 16 46 $key eq 'multiple' and $name ne 'select'
4332 799 0 $key eq 'type' and $name eq 'select'
10 0 79 $name ne 'optgroup' and $name ne 'option'
5042 89 0 $key eq 'label' and ($name ne 'optgroup' and $name ne 'option')
4931 0 121 $key eq 'title' and $name eq 'form'
259 3924 259 365 exists $html{'name'} and not exists $html{'id'}
360 1750 0 398 ref $_[0] and not wantarray
362 996 754 0 @_ and @_ % 2 != 0
381 0 0 0 ref $_[0] and not wantarray
492 1459 126 166 $ref and $ref eq 'HASH'
1459 0 126 $ref and $ref eq 'ARRAY'

or 2 conditions

line l !l condition
212 4419 0 shift() || (return)
236 4548 0 shift() || (return)

or 3 conditions

line l !l&&r !l&&!r condition
222 785 4 3630 $name eq 'input' or $name eq 'link'
241 2276 1795 12534 ref $val or not defined $val
246 7099 129 5306 $OURATTR{$key} or $key =~ /^_/
7228 0 5306 $OURATTR{$key} or $key =~ /^_/ or $key eq 'text' and $name ne 'body'
129 0 5177 $OURATTR{$key} or $key =~ /^_/ or $key eq 'text' and $name ne 'body' or $key eq 'multiple' and $name ne 'select'
46 0 5131 $OURATTR{$key} or $key =~ /^_/ or $key eq 'text' and $name ne 'body' or $key eq 'multiple' and $name ne 'select' or $key eq 'type' and $name eq 'select'
0 0 5131 $OURATTR{$key} or $key =~ /^_/ or $key eq 'text' and $name ne 'body' or $key eq 'multiple' and $name ne 'select' or $key eq 'type' and $name eq 'select' or $key eq 'label' and ($name ne 'optgroup' and $name ne 'option')
79 0 5052 $OURATTR{$key} or $key =~ /^_/ or $key eq 'text' and $name ne 'body' or $key eq 'multiple' and $name ne 'select' or $key eq 'type' and $name eq 'select' or $key eq 'label' and ($name ne 'optgroup' and $name ne 'option') or $key eq 'title' and $name eq 'form'
450 0 0 18 $sort eq 'alpha' or $sort eq 'name'
0 6 12 $sort eq 'alpha' or $sort eq 'name' or $sort eq 'NAME'
6 0 12 $sort eq 'alpha' or $sort eq 'name' or $sort eq 'NAME' or $sort eq 1
0 0 12 $sort eq 'numeric' or $sort eq 'num'
0 6 6 $sort eq 'numeric' or $sort eq 'num' or $sort eq 'NUM'
0 0 6 $sort eq 'LABELNAME' or $sort eq 'LABEL'
510 0 0 14 $ENV{'SCRIPT_NAME'} || $0