Condition Coverage

blib/lib/DBIx/DBO/DBD.pm
Criterion Covered Total %
condition 71 97 73.2


and 2 conditions

line l !l condition
23 78 865 $me->isa($_) and return 1
529 2264 695 defined $_->{$opt} and return $_->{$opt}

and 3 conditions

line !l l&&!r l&&r condition
41 0 0 0 $info and @$info == 0
42 0 0 0 $info and @$info == 1
0 0 0 $info and @$info == 1 and $info->[0][2] eq $table
118 1 47 9 @id and not length $id[0]
334 89 6 0 $with != 1 and $c{'Check'} ne "Auto"
452 18 0 1 ref $val eq "SCALAR" and $$val =~ /^\s*(?:NOT\s+)NULL\s*$/isu
535 130 0 1 $opt eq "OnRowUpdate" and $val
130 0 1 $opt eq "OnRowUpdate" and $val and $val ne "empty"
0 0 1 $opt eq "OnRowUpdate" and $val and $val ne "empty" and $val ne "simple"
0 1 0 $opt eq "OnRowUpdate" and $val and $val ne "empty" and $val ne "simple" and $val ne "reload"
537 127 1 3 $opt eq "UseHandle" and $val
128 1 2 $opt eq "UseHandle" and $val and $val ne "read-only"
2 1 1 $opt eq "UseHandle" and $val and $val ne "read-only" and $val ne "read-write"

or 2 conditions

line l !l condition
50 2 2 $cols && $cols->fetchall_arrayref({}) || []
66 2 0 $schema // ""
290 35 46 $_check_aliases || 0
300 67 73 $c{'Check'} //= ""
622 4 0 $rv || '0E0'
630 4 0 $me->config('OnRowUpdate') || 'simple'

or 3 conditions

line l !l&&r !l&&!r condition
229 9 12 0 $me->_table_alias($_) || $_->{'Name'}
254 23 57 0 $c{'Aliases'} //= do { my($method) = (caller 1)[3] =~ /(\w+)$/u; $class->_alias_preference($me, $method) }
412 3 97 24 $force || _op_ag($op)
416 3 22 3 $whs[$i][7] || _op_ag($whs[$i][0])
10 10 18 ref $whs[$i][0] or $ag ne ($whs[$i][7] || _op_ag($whs[$i][0]))
434 48 14 87 $_[0] eq "=" or $_[0] eq "IS"
62 0 87 $_[0] eq "=" or $_[0] eq "IS" or $_[0] eq "<=>"
14 14 73 $_[0] eq "=" or $_[0] eq "IS" or $_[0] eq "<=>" or $_[0] eq "IN"
14 8 65 $_[0] eq "=" or $_[0] eq "IS" or $_[0] eq "<=>" or $_[0] eq "IN" or $_[0] eq "BETWEEN"
435 14 7 44 $_[0] eq "<>" or $_[0] eq "IS NOT"
21 7 37 $_[0] eq "<>" or $_[0] eq "IS NOT" or $_[0] eq "NOT IN"
14 7 30 $_[0] eq "<>" or $_[0] eq "IS NOT" or $_[0] eq "NOT IN" or $_[0] eq "NOT BETWEEN"
551 1 0 0 $me->{'sth'} or $me->run
638 1 0 4 defined $update[1][1] || @{$update[1][0];} != 1 || ref $update[1][0][0] && (!_isa($update[1][0][0], 'DBIx::DBO::Column') || $cant_update[$me->_column_idx($update[1][0][0])])