Condition Coverage

blib/lib/DBD/Sprite.pm
Criterion Covered Total %
condition 5 123 4.0


and 3 conditions

line !l l&&!r l&&r condition
913 0 0 0 defined $resptr->{'sprite_insertid'} and $resptr->{'sprite_insertid'} =~ /\d$/
923 0 0 0 $lastseq =~ /\d$/ and $lastseq > 0
1006 0 0 0 not $joininfo and $sqlstr =~ /from\s+([\w\.\,\s]+)/iso
1041 0 0 0 ref $resptr->{'sprite_SpritesOpen'} and ref $resptr->{'sprite_SpritesOpen'}{$fid}
1271 0 0 0 $dB->FETCH('AutoCommit') and $dB->FETCH('Warn')
1293 0 0 0 not shift() and $dB->FETCH('AutoCommit')
0 0 0 not shift() and $dB->FETCH('AutoCommit') and $dB->FETCH('Warn')
1317 0 0 0 $val == 1 and not $dbh->FETCH('AutoCommit')
1548 0 0 0 $params and scalar @$params != $numParam
1862 0 0 0 defined $retval and $retval
1944 0 0 0 $row and scalar @$row

or 2 conditions

line l !l condition
676 1 0 $dbuser ||= ''
677 1 0 $dbpswd ||= ''
698 0 1 $ENV{'SPRITE_HOME'} ||= ''
719 0 1 $pgmhome ||= '.'
772 0 0 $attr->{'AutoCommit'} || 0
791 0 0 $attr->{'sprite_read'} || $attr->{'sprite_field'} || eval qq[return("$dbinputs[3]");] || '::'
792 0 0 $attr->{'sprite_write'} || $attr->{'sprite_field'} || eval qq[return("$dbinputs[3]");] || '::'
793 0 0 $attr->{'sprite_record'} || eval qq[return("$dbinputs[4]");] || "\n"
795 0 0 $attr->{'AutoCommit'} || 0
797 0 0 $attr->{'AutoCommit'} || 0
889 0 0 shift @_ || ''
890 0 0 shift() || ''
891 0 0 shift() || ''
893 0 0 $dbname || ''
0 0 $host || ''
0 0 $port || ''
1367 0 0 $csr->execute(@bind_values) || undef
1586 0 0 $spriteref->{'lasterror'} || -601
0 0 $spriteref->{'lastmsg'} || 'Unknown Error!'
1845 0 0 $resv[0] || '0E0'
1946 0 0 $sth->{'Database'}->FETCH('LongReadLen') || 0

or 3 conditions

line l !l&&r !l&&!r condition
720 0 0 1 $pgmhome =~ m[\/$] or $dbfid =~ m[^\/]
764 0 0 0 $dbinputs[2] eq $crypted or $@ =~ /excessive paranoia/
887 0 0 0 $command eq 'createdb' || $command eq 'dropdb'
1020 0 0 0 $joinfid[$i] ||= $joinfids[$i]
1061 0 0 0 $attribs->{'sprite_read'} || $attribs->{'sprite_field'} || $resptr->FETCH('sprite_dbfdelim')
1062 0 0 0 $attribs->{'sprite_write'} || $attribs->{'sprite_field'} || $resptr->FETCH('sprite_dbwdelim')
1063 0 0 0 $attribs->{'sprite_record'} || $attribs->{'sprite_field'} || $resptr->FETCH('sprite_dbrdelim')
1144 0 0 0 $whereclause =~ s/\s+order\s+by\s*(.*)//iso or $joinsql[$jj] =~ s/\s+order\s+by\s*(.*)//iso
1284 0 0 0 not defined $commitResult or $commitResult <= 0
1702 0 0 0 $tbl eq $joinfids->[1] or $tbl eq $joinalii->[1]
1739 0 0 0 $joinalii->[0] || $joinfids->[0]
0 0 0 $joinalii->[1] || $joinfids->[1]
1799 0 0 0 !($cond =~ /\S/o) || eval $cond
1826 0 0 0 !($cond =~ /\S/o) || eval $cond
1956 0 0 0 $row->[$i] eq $t or $sth->{'Database'}->FETCH('LongTruncOk')
1980 0 0 0 return $sth->FETCH('driver_rows') or $sth->FETCH('sprite_rows')