Branch Coverage

blib/lib/Dimedis/SqlDriver/ASAny.pm
Criterion Covered Total %
branch 0 50 0.0


line true false branch
76 0 0 unless my $sth = $dbh->prepare("select $$par{'col'}\n from $$par{'table'}\n where $$par{'where'}")
82 0 0 unless $sth->execute(@{$$par{'params'};})
86 0 0 unless my $ar = $sth->fetchrow_arrayref
89 0 0 unless $sth->finish
93 0 0 if ($filename) { }
0 0 elsif ($filehandle) { }
94 0 0 unless open BLOB, "> $filename"
143 0 0 unless $from_tables{$left}
146 0 0 if (ref $$lref[1]) { }
148 0 0 if (@{$$lref[1];} > 1) { }
165 0 0 unless $from_tables{$$lref[$i][0]}
306 0 0 if ($modified != 1)
332 0 0 unless ($id)
346 0 0 unless $modified == 1
359 0 0 if $$self{'debug'}
385 0 0 if (exists $$par{'cache'})
394 0 0 unless $$self{'cache'}
403 0 0 if ($type eq 'serial') { }
0 0 elsif ($type eq 'blob' or $type eq 'clob') { }
436 0 0 if ($$par{'db_action'} eq 'insert') { }
454 0 0 if (@columns)
475 0 0 if (ref $val and ref $val ne 'SCALAR') { }
0 0 elsif (not ref $val) { }
486 0 0 unless open $fh, $val
489 0 0 if $$self{'debug'}