line |
true |
false |
branch |
42
|
0 |
0 |
if ($$self{'_tx'}) |
56
|
0 |
0 |
unless (eval {
do {
$$self{'_tx'} = 1;
$dbh->begin_work;
@res = &$sub();
$dbh->commit;
$$self{'_tx'} = 0;
1
}
}) |
67
|
0 |
0 |
if $_[0]->dbh |
124
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($sql) |
126
|
0 |
0 |
unless $sth->execute($_[0], $_[1]) |
137
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($sql) |
139
|
0 |
0 |
unless $sth->execute($_[0], $_[1]) |
155
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($sql_update) |
164
|
0 |
0 |
unless $sth->execute |
167
|
0 |
0 |
unless ($sth->rows) |
169
|
0 |
0 |
unless $sth = $dbh->prepare_cached($sql_insert) |
171
|
0 |
0 |
unless $sth->execute($_[0], $_[1], $_[0]) |
185
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($sql_update) |
187
|
0 |
0 |
unless $sth->execute($_[1], $_[0]) |
188
|
0 |
0 |
unless ($sth->rows) |
190
|
0 |
0 |
unless $sth = $dbh->prepare_cached($sql_insert) |
192
|
0 |
0 |
unless $sth->execute($_[0], $_[1], $_[0]) |
202
|
0 |
0 |
if ($driver_name =~ /pg/i) |
214
|
0 |
0 |
unless $dbh->do($sql) |
222
|
0 |
0 |
unless $dbh->do($sql) |
228
|
0 |
0 |
if ($driver_name =~ /sqlite/i) |
229
|
0 |
0 |
if ($driver_name =~ /mysql/i) |
230
|
0 |
0 |
if ($driver_name =~ /pg/i) |
256
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($self->_sql_delete_all) |
258
|
0 |
0 |
unless $sth->execute |
277
|
0 |
0 |
unless ($sth) |
278
|
0 |
0 |
unless $sth = $dbh->prepare($self->_sql_generator) |
282
|
0 |
0 |
if ($row = $sth->fetchrow_arrayref) |
293
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($self->_sql_count) |
295
|
0 |
0 |
unless $sth->execute |
311
|
0 |
0 |
if ($driver_name =~ /sqlite/i) |
312
|
0 |
0 |
if ($driver_name =~ /mysql/i) |
313
|
0 |
0 |
if ($driver_name =~ /pg/i) |
326
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($sql) |
328
|
0 |
0 |
unless $sth->execute($start, $limit) |
342
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($sql) |
344
|
0 |
0 |
unless $sth->execute($start, $limit) |
358
|
0 |
0 |
unless my $sth = $dbh->prepare_cached($sql) |
360
|
0 |
0 |
unless $sth->execute($limit, $start) |
374
|
0 |
0 |
if (defined $total) |
375
|
0 |
0 |
unless $total |
380
|
0 |
0 |
unless ($sth) |
381
|
0 |
0 |
if (defined $total) { } |
385
|
0 |
0 |
unless $sth = $dbh->prepare($self->_sql_generator) |
390
|
0 |
0 |
if ($row = $sth->fetchrow_arrayref) |