Branch Coverage

blib/lib/HTML/DBForm.pm
Criterion Covered Total %
branch 3 58 5.1


line true false branch
136 0 1 unless @_ % 2 == 0
142 0 1 $params{'template'} ? :
242 0 1 unless @_ % 2 == 0
283 0 0 unless @_ % 2 == 0
288 0 0 if ($params{'dbh'}) { }
291 0 0 unless $$self{'dbh'} = 'DBI'->connect("$params{'datasource'}", "$params{'username'}", "$params{'password'}", {'RaiseError', 1})
335 0 0 $params{'primary_key'} ? :
368 0 0 if ($pk_val)
397 0 0 $pk_val ? :
407 0 0 unless $$self{'error'}
427 0 0 if $$element{'type'} eq 'element'
541 0 0 unless $o_type
542 0 0 if $$element{'options'}[0][1]
547 0 0 if ($o_type eq 'ARRAY')
560 0 0 if ($o_type eq 'HASH')
567 0 0 if ($o_type eq 'AOA')
580 0 0 if ($o_type eq 'SQL')
584 0 0 unless eval { do { $db_return = $$self{'dbh'}->selectall_arrayref($$element{'options'}); 1 } }
617 0 0 if grep /$param/, @{$$self{'params'};}
643 0 0 if ($$element{'type'} eq 'date') { }
666 0 0 unless eval { do { $$self{'dbh'}->do($SQL, undef, @values); 1 } }
673 0 0 unless $$self{'error'}
700 0 0 if ($$element{'type'} eq 'date') { }
718 0 0 unless eval { do { $sth->execute(@values); 1 } }
720 0 0 unless $$self{'error'}
740 0 0 unless eval { do { $sth->execute($$self{'query'}->param($$self{'pk'})); 1 } }
744 0 0 unless $$self{'error'}
767 0 0 if ($$self{'err_handler'}) { }
770 0 0 if $$self{'verbose'}