Condition Coverage

lib/CGI/FormBuilder.pm
Criterion Covered Total %
condition 94 190 49.4


and 3 conditions

line !l l&&!r l&&r condition
127 0 0 0 $opt{'c'} && $opt{'c'}->action
225 3 102 4 $ref and $ref eq 'HASH'
313 1095 0 1 ref $_[0] eq 'ARRAY' and @_ == 1
404 334 0 12 $self->{'fieldtype'} and not exists $args->{'type'}
475 173 10 11 $_->fieldset and $_->fieldset eq $set
500 0 26 3 $self->{'cookies'} and defined(my $sid = $self->sessionid)
658 218 0 0 @_ == 1 and UNIVERSAL::isa($_[0], 'HASH')
685 0 0 0 @_ == 1 and UNIVERSAL::isa($_[0], 'HASH')
712 383 0 0 @_ == 1 and UNIVERSAL::isa($_[0], 'HASH')
734 90 0 0 @_ == 1 and UNIVERSAL::isa($_[0], 'HASH')
873 150 0 0 exists $ENV{'HTTP_USER_AGENT'} and $ENV{'HTTP_USER_AGENT'} =~ /lynx|mosaic/i
1032 0 2 0 $limit and $limit ne 1
1477 12 58 0 not $ref and $self->{'template'}
1532 0 4 59 $tmpl and UNIVERSAL::can($tmpl, 'prepare')
1556 0 0 0 $args->{'mailer'} && -x $mailer
1656 0 0 0 $args->{'skip'} and $field =~ /$args->{'skip'}/
1678 3229 0 0 $self->{'fieldsubs'} and $self->{'fieldrefs'}{$name}
1696 2617 612 0 !exists $self->{$name} || @_ and not $CGI::FormBuilder::Util::OURATTR{$name}

or 2 conditions

line l !l condition
136 22 1 delete $src->{'type'} || 'File'
212 2 0 $lang ||= 'default'
428 0 0 $self->{'fieldsets'} ||= []
518 32 0 $self->{'charset'} || $self->{'messages'}->charset || 'iso8859-1'
524 3 0 $self->{'lang'} || $self->{'messages'}->lang || 'en_US'
562 0 0 ref $self->{'font'} || ''
611 2 5 $self->{'body'}{'bgcolor'} ||= 'white'
675 8 160 $attr->{'valign'} ||= 'top'
702 0 0 $self->{'lalign'} || 'left'
760 0 11 $self->{'params'}->param($self->submitname) || '0E0'
797 0 153 $self->{'params'}->param($self->{'sessionidname'}) || undef
839 4 6 ref $self->{'keepextras'} || ''
903 132 0 $self->jsprefix || ''
914 4 116 $self->jsfunc || ''
915 0 120 $self->jshead || ''
985 2 0 $self->jsprefix || ''
1043 5 0 $self->jsprefix || ''
1161 17 2 shift() || ''
1170 35 13 shift() || ''
1189 4 66 $self->{'tmplvar'} || {}
1354 0 0 shift() || 'fb'
1495 11 1 delete $opt->{'type'} || 'HTML'
1507 12 58 $mod ||= 'Builtin'
1612 0 0 $args->{'from'} ||= 'auto-reply'
1639 0 0 $args->{'delimiter'} || ': '
1641 0 0 $args->{'separator'} || "\n"

or 3 conditions

line l !l&&r !l&&!r condition
132 23 0 0 $ref || $src
193 0 0 135 $ENV{'FORMBUILDER_DEBUG'} || $self->{'debug'}
210 0 0 0 $ENV{'HTTP_ACCEPT_LANGUAGE'} || $ENV{'LC_MESSAGES'} || $ENV{'LC_ALL'} || $ENV{'LANG'}
318 105 37 953 $args->{'name'} ||= $name
580 121 8 0 $attr{'action'} ||= $self->action
581 129 0 0 $attr{'method'} ||= $self->method
584 0 20 109 $attr{'class'} ||= $self->class($self->formname)
650 22 1 81 $attr->{'class'} ||= $self->class
702 0 0 0 $attr->{'align'} ||= $self->{'lalign'} || 'left'
751 0 13 0 shift() || $self->submittedname
848 4 0 46 $p =~ /^_/ or $self->{'fieldrefs'}{$p}
902 132 0 0 $self->jsname || &puke(q[Must have 'jsname' if 'javascript' is on])
926 33 5 82 $jsfunc or $jsmisc
38 0 82 $jsfunc or $jsmisc or $jshead
969 14 19 0 $self->{'onsubmit'} ||= "return $jsname(this);"
1111 0 4 124 not $self->{'submit'} or $self->static
4 2 122 not $self->{'submit'} or $self->static or $self->disabled
1121 124 0 5 not $self->{'reset'} or $self->static
124 0 5 not $self->{'reset'} or $self->static or $self->disabled
1147 2 1 56 $self->static or $self->disabled
1246 85 4 29 $val{lc $_} || shift @val
1386 0 0 0 $self->{'text'} ||= sprintf($self->{'messages'}->form_confirm_text, $date)
1609 0 0 0 $args->{'to'} ||= $to
1613 0 0 0 $args->{'subject'} ||= sprintf($self->{'messages'}->mail_confirm_subject, $self->title)
1614 0 0 0 $args->{'text'} ||= sprintf($self->{'messages'}->mail_confirm_text, scalar localtime())
1640 0 0 0 $args->{'joiner'} || $"
1644 0 0 0 $args->{'subject'} ||= sprintf($self->{'messages'}->mail_results_subject, $self->title)
1696 612 0 2617 !exists $self->{$name} || @_