blib/lib/HealthCheck/Diagnostic/DBHPing.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 6 | 9 | 66.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
19 | 4 | 0 | 0 | @params == 1 && (ref $params[0] || '') eq 'HASH' |
34 | 3 | 2 | 4 | $dbh and do { local $@; local $SIG{'__DIE__'}; eval { do { $dbh->can('ping') } } } |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
31 | 0 | 3 | 1 | $dbh ||= $self->{'dbh'} |