| line |
true |
false |
branch |
|
29
|
1 |
20 |
unless ref $config->{'load_classes'} eq 'ARRAY' |
|
32
|
1 |
19 |
unless ref $config->{'dbh_attributes'} eq 'HASH' |
|
35
|
11 |
8 |
if (not $config->{'dsn'}) { } |
|
37
|
2 |
9 |
unless $config->{'driver'} |
|
38
|
2 |
7 |
unless $config->{'database'} =~ /\w+/x |
|
46
|
1 |
6 |
$config->{'port'} ? : |
|
48
|
7 |
0 |
if ($config->{'database'} =~ /(\w+)/x) |
|
49
|
2 |
5 |
unless $config->{'namespace'} |
|
58
|
7 |
0 |
if ($scheme =~ /(database|dbname)=\W?(\w+)/x) |
|
62
|
0 |
7 |
$attr_hash ? : |
|
77
|
1 |
16 |
unless (ref $config->{'onconnect_do'}) |
|
81
|
1 |
12 |
unless $sql |
|
82
|
8 |
4 |
if (ref $sql eq 'CODE') |
|
87
|
14 |
3 |
if (eval {
do {
require $schema
}
}) { } |
|
104
|
8 |
6 |
unless $config->{'postpone_connect'} |
|
116
|
13 |
4 |
if (scalar @{$config->{'load_classes'};}) { } |
|
119
|
13 |
0 |
unless $namespace =~ /:{2}$/ |
|
121
|
7 |
13 |
if ($class =~ /^$namespace/) |
|
123
|
0 |
0 |
ref $e ? : |
|
|
0 |
7 |
if $e |
|
128
|
1 |
12 |
if (ref $e) { } |
|
|
1 |
11 |
elsif ($e) { } |
|
133
|
0 |
0 |
ref $e2 ? : |
|
|
0 |
1 |
if $e2 |
|
142
|
1 |
2 |
if $e |