line |
true |
false |
branch |
30
|
0 |
0 |
if (ref $config ne 'HASH' or not $config->{'database_username'} or not $config->{'database_password'})
|
58
|
0 |
0 |
if $self->{'dbh'} and &blessed($self->{'dbh'}) =~ /DBI/ and time - $self->{'connect_time'} < 5 || $self->{'dbh'}->ping
|
97
|
0 |
0 |
unless $database_name
|
100
|
0 |
0 |
if $database_name =~ /[^a-z0-9\_]/i
|
123
|
0 |
0 |
if (not $results->[0]) { }
|
175
|
0 |
0 |
if ($bind_values) { }
|
183
|
0 |
0 |
if ($_ =~ /Deadlock/) { }
|
198
|
0 |
0 |
if ($sql =~ /^select|^show|^desc/i) { }
|
|
0 |
0 |
elsif ($sql =~ /^(insert|replace)/i) { }
|
235
|
0 |
0 |
if ($bind_values) { }
|
267
|
0 |
0 |
if ($bind_values->[0]) { }
|
291
|
0 |
0 |
unless ($names->[0])
|
312
|
0 |
0 |
if ($bind_values->[0]) { }
|