Branch Coverage

blib/lib/Apache/DBI.pm
Criterion Covered Total %
branch 2 48 4.2


line true false branch
5 0 1 exists $ENV{'MOD_PERL_API_VERSION'} && $ENV{'MOD_PERL_API_VERSION'} == 2 ? :
9 0 1 if (defined $modperl::VERSION and $modperl::VERSION > 1 and $modperl::VERSION < 1.99)
46 0 0 if $DEBUG >= $_[0]
63 0 0 unless $INC{'Apache.pm'}
66 0 0 if (not @ChildConnect and 'Apache'->can('push_handlers'))
84 0 0 if ($data_source =~ /dbi:\w+:.*/ and $timeout =~ /\-*\d+/)
92 0 0 if ref $class
95 0 0 defined $_ ? :
104 0 0 if (3 == $#args and ref $args[3] eq 'HASH') { }
0 0 elsif (3 == $#args) { }
106 0 0 defined $args[3]{$_} ? :
130 0 0 if ($Apache::ServerStarting and $Apache::ServerStarting == 1)
140 0 0 if (not $Rollback{$Idx} and 'Apache'->can('push_handlers'))
155 0 0 unless $PingTimeOut{$dsn}
156 0 0 unless $LastPingTime{$dsn}
159 0 0 $PingTimeOut{$dsn} == 0 || $PingTimeOut{$dsn} > 0 && $now - $LastPingTime{$dsn} > $PingTimeOut{$dsn} ? :
163 0 0 $needping == 1 ? :
171 0 0 if ($Connected{$Idx} and !$needping || eval {
185 0 0 if not $Connected{$Idx}
204 0 0 if (@ChildConnect)
226 0 0 if ($Rollback{$Idx} and $dbh and $$dbh{'Active'} and not $$dbh{'AutoCommit'} and eval {
257 0 0 if ($TaintInOut)
274 0 0 if $Connected{$Idx}{'Active'} and not $Connected{$Idx}{'AutoCommit'}
281 0 0 if ($TaintInOut)