line |
true |
false |
branch |
48
|
0 |
17 |
if $class->metadm->{'singleton'} |
81
|
0 |
86 |
if ref $class |
91
|
16 |
811 |
if (not $metadm->{'singleton'}) { } |
|
0 |
811 |
elsif (@_) { } |
93
|
0 |
16 |
if exists $metadm->{'singleton'} |
114
|
33 |
302 |
unless ref $self |
117
|
26 |
309 |
if (@_ > 1) |
120
|
3 |
23 |
if &does($dbh, "ARRAY") and not keys %dbh_options |
125
|
0 |
3 |
unless not $self->{'dbh'} or $self->{'dbh'}[0]{'AutoCommit'} |
127
|
24 |
2 |
if ($dbh) { } |
129
|
0 |
24 |
unless $dbh->isa("DBI::db") |
134
|
0 |
24 |
unless $dbh->{'RaiseError'} |
137
|
24 |
0 |
unless (exists $dbh_options{'returning_through'}) |
139
|
0 |
24 |
if (/^Oracle/) |
140
|
0 |
24 |
if (/^Pg/) |
154
|
58 |
277 |
wantarray ? : |
167
|
0 |
1471 |
unless ref $self |
169
|
62 |
1409 |
if (@_) |
179
|
0 |
0 |
unless ref $self |
191
|
1 |
2 |
unless ref $self |
193
|
1 |
2 |
unless @components |
206
|
3 |
0 |
unless ref $self |
209
|
0 |
3 |
unless $self->{'transaction_dbhs'} |
216
|
25 |
0 |
unless ref $self |
218
|
0 |
25 |
unless &does($coderef, "CODE") |
226
|
2 |
23 |
if @new_dbh |
231
|
0 |
25 |
unless my $dbh = $self->dbh |
235
|
12 |
5 |
defined wantarray ? : |
|
8 |
17 |
wantarray ? : |
250
|
15 |
10 |
if ($dbh->{'AutoCommit'}) |
259
|
12 |
13 |
if (@$transaction_dbhs) { } |
266
|
0 |
13 |
if ($dbh->isa("DBIx::RetryOverDisconnects::db")) |
277
|
0 |
13 |
unless $dbh->{'AutoCommit'} |
292
|
0 |
5 |
if ($dbh->isa("DBIx::RetryOverDisconnects::db") and $dbh->is_trans_disconnect) |
296
|
0 |
0 |
if $retry < $n_retries |
325
|
2 |
30 |
wantarray ? : |
339
|
92 |
11 |
unless ref $self |
341
|
2 |
100 |
unless my $meta_source = $self->metadm->$remote(@_) |
355
|
0 |
208 |
if ($debug) |
356
|
0 |
0 |
if (ref $debug and $debug->can('debug')) { } |
387
|
3 |
0 |
if (exists $previous_state->{'dbh'}) |
409
|
0 |
4 |
@rollback_errs ? : |