| 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' |
|
38
|
5 |
9 |
if ref $self |
|
40
|
2 |
12 |
unless $dbh |
|
42
|
1 |
11 |
unless ref $dbh eq 'CODE' |
|
49
|
1 |
10 |
unless $db_access =~ /^r[ow]$/ |
|
54
|
2 |
6 |
unless &blessed($dbh) |
|
63
|
1 |
5 |
unless $dbh->isa($db_class) |
|
111
|
2 |
0 |
if $row[0] and $row[0] eq 'Hello world' |
|
130
|
2 |
3 |
if ($dbh->can('ping') and not $dbh->ping) |
|
137
|
0 |
3 |
unless (defined $value and $value == 1) |
|
142
|
2 |
1 |
if $read_write |
|
152
|
3 |
2 |
$status eq 'OK' ? : |
|
|
4 |
1 |
$read_write ? : |
|
|
2 |
3 |
$dbh->{'Username'} ? : |