| 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'} |