| line |
true |
false |
branch |
|
14
|
5 |
0 |
if ($DBI::VERSION >= 1.614) |
|
15
|
5 |
0 |
unless exists $$attr{'AutoInactiveDestroy'} |
|
17
|
4 |
1 |
if ($dsn =~ /^dbi:SQLite:/i) { } |
|
|
0 |
1 |
elsif ($dsn =~ /^dbi:mysql:/i) { } |
|
|
0 |
1 |
elsif ($dsn =~ /^dbi:Pg:/i) { } |
|
18
|
4 |
0 |
unless exists $$attr{'sqlite_unicode'} |
|
21
|
0 |
0 |
unless exists $$attr{'mysql_enable_utf8'} |
|
25
|
0 |
0 |
if (not $@ and $dbd_pg_version < 2.99) |
|
26
|
0 |
0 |
unless exists $$attr{'pg_enable_utf8'} |
|
29
|
0 |
4 |
unless my $self = $class->SUPER::connect($dsn, $user, $pass, $attr) |
|
54
|
0 |
0 |
unless (defined $$self{'private_txn_manager'}) |