| line |
true |
false |
branch |
|
20
|
0 |
6 |
@params == 1 && (ref $params[0] || '') eq 'HASH' ? : |
|
23
|
1 |
5 |
if $params{'dbh'} and ref $params{'dbh'} ne 'CODE' |
|
37
|
5 |
8 |
if ref $self |
|
39
|
2 |
11 |
unless $dbh |
|
41
|
1 |
10 |
unless ref $dbh eq 'CODE' |
|
48
|
1 |
9 |
unless $db_access =~ /^r[ow]$/ |
|
53
|
1 |
8 |
if ($@) |
|
58
|
2 |
6 |
unless &blessed($dbh) |
|
69
|
1 |
5 |
unless $dbh->isa($db_class) |
|
118
|
2 |
0 |
if $row[0] and $row[0] eq 'Hello world' |
|
135
|
5 |
0 |
if ($dbh->can('ping')) |
|
136
|
3 |
2 |
$dbh->ping ? : |
|
139
|
3 |
2 |
if ($status eq 'OK') |
|
142
|
3 |
0 |
defined $value && $value == 1 ? : |
|
145
|
2 |
3 |
if $status eq 'OK' and $read_write |
|
155
|
3 |
2 |
$status eq 'OK' ? : |
|
|
4 |
1 |
$read_write ? : |
|
|
2 |
3 |
$dbh->{'Username'} ? : |