line |
true |
false |
branch |
48
|
0 |
0 |
if $$self{'debug'} |
52
|
0 |
0 |
$$self{'utf8'} ? : |
53
|
0 |
0 |
$$self{'utf8'} ? : |
55
|
0 |
0 |
if ($num_version >= 40100) { } |
61
|
0 |
0 |
if $$self{'debug'} |
64
|
0 |
0 |
if $$self{'debug'} |
115
|
0 |
0 |
unless my $sth = $dbh->prepare("select $$par{'col'}\n\t\t from $$par{'table'}\n\t\t where $$par{'where'}") |
121
|
0 |
0 |
unless $sth->execute(@{$$par{'params'};}) |
126
|
0 |
0 |
if $DBI::errstr |
127
|
0 |
0 |
unless (defined $ar) |
133
|
0 |
0 |
unless $sth->finish |
137
|
0 |
0 |
if ($filename) { } |
|
0 |
0 |
elsif ($filehandle) { } |
138
|
0 |
0 |
unless open BLOB, "> $filename" |
155
|
0 |
0 |
if $$par{'filehandle'} or $$par{'filename'} |
182
|
0 |
0 |
if $where eq '' |
194
|
0 |
0 |
unless $left_table_out |
197
|
0 |
0 |
if (ref $$lref[1]) { } |
199
|
0 |
0 |
if (@{$$lref[1];} > 1) { } |
234
|
0 |
0 |
$$par{'op'} eq '!=' ? : |
240
|
0 |
0 |
if $$self{'utf8'} |
343
|
0 |
0 |
if ($type eq 'serial' and not defined $val) { } |
|
0 |
0 |
elsif ($type eq 'blob' or $type eq 'clob') { } |
359
|
0 |
0 |
if ($$self{'utf8'} and $$type_href{$col} eq 'clob') { } |
|
0 |
0 |
elsif (not $$self{'utf8'} and $$type_href{$col} eq 'clob') { } |
363
|
0 |
0 |
if &Encode::is_utf8($$val) |
375
|
0 |
0 |
if ($$self{'utf8'}) { } |
379
|
0 |
0 |
if &Encode::is_utf8($val) |
387
|
0 |
0 |
if $val eq '' |
398
|
0 |
0 |
if ($$par{'db_action'} eq 'insert') { } |
425
|
0 |
0 |
if ($$self{'utf8'}) { } |
432
|
0 |
0 |
if &Encode::is_utf8($p) |
444
|
0 |
0 |
if (@columns) |