Condition Coverage

lib/CGI/FormBuilder/Util.pm
Criterion Covered Total %
condition 60 85 70.5


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 10 79 $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 129 5177 $OURATTR{$key} or $key =~ /^_/ or $key eq "text" and $name ne "body"
129 46 5131 $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 79 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")
79 4556 496 $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 14 0 $ENV{'SCRIPT_NAME'} || $0