| line |
true |
false |
branch |
|
30
|
0 |
5 |
unless $super |
|
52
|
4 |
5 |
if ($@) { } |
|
|
5 |
0 |
elsif ($ret) { } |
|
56
|
0 |
2 |
if $tries > 0 and $$conninfo[3]{'PrintError'} || !exists($$conninfo[3]{'PrintError'}) |
|
66
|
0 |
4 |
if $$attr{'ReconnectFailure'} |
|
69
|
0 |
4 |
if (defined $$attr{'ReconnectMaxTries'} and $$attr{'ReconnectMaxTries'} <= $tries) |
|
73
|
0 |
0 |
unless $@ |
|
75
|
0 |
0 |
if ($$conninfo[3]{'RaiseError'}) { } |
|
78
|
0 |
0 |
if not exists $$conninfo[3]{'PrintError'} or $$conninfo[3]{'PrintError'} |
|
84
|
0 |
4 |
if ($$attr{'ReconnectTimeout'} > 0) |
|
85
|
0 |
0 |
if $$conninfo[3]{'PrintError'} |
|
99
|
9 |
2 |
if $method eq 'connect' or not $self->dbh->{'AutoCommit'} |
|
104
|
0 |
2 |
unless $super |
|
108
|
0 |
4 |
if (defined $$self{'attr'}{'ReconnectMaxTries'} and $$self{'attr'}{'ReconnectMaxTries'} <= $tries) |
|
112
|
0 |
0 |
if ($$conninfo[3]{'RaiseError'}) { } |
|
115
|
0 |
0 |
if not exists $$conninfo[3]{'PrintError'} or $$conninfo[3]{'PrintError'} |
|
123
|
0 |
4 |
unless ($self->dbh) |
|
124
|
0 |
0 |
$$conninfo[3]{'RaiseError'} ? : |
|
133
|
0 |
4 |
if ($wantarray) { } |
|
139
|
0 |
2 |
wantarray ? : |
|
|
2 |
2 |
unless $@ |
|
144
|
0 |
2 |
if ($self->dbh->ping) { } |
|
146
|
0 |
0 |
if ($$conninfo[3]{'RaiseError'}) { } |
|
149
|
0 |
0 |
if not exists $$conninfo[3]{'PrintError'} or $$conninfo[3]{'PrintError'} |
|
164
|
4 |
13 |
if ($key eq 'ReconnectTimeout' or $key eq 'ReconnectMaxTries') { } |
|
|
0 |
13 |
elsif ($key eq 'ReconnectFailure') { } |
|
|
8 |
5 |
elsif (not exists $$self{'defaults'}{$key}) { } |
|
165
|
0 |
4 |
unless $val =~ /^\d+$/ |
|
168
|
0 |
0 |
if not defined $val && ref $val or ref $val ne 'CODE' |