| line |
true |
false |
branch |
|
26
|
0 |
10 |
if $DBD::Multi::drh |
|
61
|
112 |
1 |
$attr->{'dsns'} && ref $attr->{'dsns'} eq 'ARRAY' ? : |
|
64
|
0 |
113 |
if ($dbname =~ /dsn=(.*)/) |
|
72
|
0 |
113 |
if exists $attr->{'failed_max'} |
|
74
|
1 |
112 |
if exists $attr->{'failed_expire'} |
|
104
|
24 |
412 |
unless ($_sth) |
|
131
|
0 |
0 |
if ($dbh->FETCH('Active')) |
|
132
|
0 |
0 |
if $dbh->FETCH('_dbh') |
|
139
|
0 |
0 |
if ($dbh->FETCH('Active')) |
|
140
|
0 |
0 |
if $dbh->FETCH('_dbh') |
|
197
|
5 |
405 |
@_ ? : |
|
199
|
1 |
409 |
if $sth->FETCH('Active') |
|
205
|
3 |
1637 |
unless not defined $value or defined $sth->FETCH($field) |
|
215
|
1634 |
407 |
unless $sth->{'_sth'}->FETCH($attrib) |
|
304
|
113 |
0 |
unless defined $self->nextid |
|
309
|
113 |
0 |
unless defined $self->failed_max |
|
310
|
113 |
0 |
unless defined $self->failed_expire |
|
311
|
113 |
0 |
unless defined $self->timeout |
|
336
|
441 |
6 |
if $dbh |
|
355
|
791 |
175 |
unless $self->failed->{$dsource} |
|
356
|
1 |
174 |
if ($now - $self->failed_last->{$dsource} > $self->failed_expire) |
|
371
|
448 |
118 |
if (defined $dsource) |
|
379
|
0 |
2 |
if grep({$self->failed->{$_} >= $self->failed_max;} keys %{$self->failed;}) < keys %{$self->all_dsources;} |
|
392
|
174 |
637 |
if exists $self->failed->{$_} |
|
395
|
118 |
448 |
if @used == @dsources and @failed == @dsources |
|
398
|
271 |
177 |
if @used == @dsources |
|
402
|
1 |
470 |
if $self->failed->{$dsource} and $self->failed->{$dsource} >= $self->failed_max |
|
403
|
22 |
448 |
if $self->used->{$dsource} |
|
417
|
0 |
234 |
unless my $dsource = shift @{$dsources;} |
|
424
|
450 |
84 |
unless ($dsource) |
|
430
|
54 |
478 |
if UNIVERSAL::isa($dsource, 'DBI::db') |
|
433
|
213 |
265 |
if (ref $dsource eq 'CODE') |
|
435
|
207 |
6 |
if UNIVERSAL::isa($handle, 'DBI::db') |
|
441
|
0 |
264 |
if (&timeout_call(scalar $self->timeout, sub {
$dbh = 'DBI'->connect_cached(@{$dsource;});
}
)) |
|
459
|
0 |
84 |
unless $dbh |
|
460
|
12 |
72 |
if ($dbh->{'handler'}) |