| line |
true |
false |
branch |
|
21
|
0 |
0 |
if (my $orig = $opts->{$mode}) |
|
22
|
0 |
0 |
if (not ref $orig) { } |
|
|
0 |
0 |
elsif (ref $orig eq 'CODE') { } |
|
|
0 |
0 |
elsif (ref $orig eq 'ARRAY') { } |
|
82
|
0 |
0 |
if (my $e = $@) |
|
83
|
0 |
0 |
if ($e =~ /DBI connect\(.+\) failed:/) { } |
|
84
|
0 |
0 |
if ($e =~ /Can't connect to MySQL server on '[^']*' \(111\)/) { } |
|
|
0 |
0 |
elsif ($e =~ /Lost connection to MySQL server at/) { } |
|
|
0 |
0 |
elsif ($e =~ /Unknown MySQL server host '[^']*' \(0\)/ or $e =~ /Can't connect to MySQL server on/) { } |
|
109
|
0 |
0 |
if $self->{'handler'} |