| blib/lib/App/MonM/Store.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 27 | 58 | 46.5 |
| line | true | false | branch |
|---|---|---|---|
| 281 | 1 | 0 | unless ($args{'dsn'}) |
| 300 | 0 | 1 | $args{'timeout'} ? : |
| 302 | 1 | 0 | if $db |
| 307 | 1 | 0 | if ($dbh and $dsn =~ /SQLite/i) |
| 309 | 1 | 0 | unless ($file and -e $file and not -z $file) |
| 319 | 0 | 1 | if (not $db) { } |
| 0 | 1 | elsif (not $dbh) { } | |
| 1 | 0 | elsif ($fnew) { } | |
| 325 | 0 | 1 | if $dbh->err |
| 327 | 1 | 0 | unless ($error) |
| 328 | 0 | 1 | unless $dbh->ping |
| 345 | 4 | 6 | unless defined $err |
| 351 | 0 | 6 | unless $self->{'dsn'} |
| 353 | 0 | 6 | unless $dbi |
| 355 | 0 | 6 | unless $dbh |
| 356 | 0 | 6 | unless $dbh->can("ping") |
| 365 | 0 | 0 | $self->{'issqlite'} ? : |
| 373 | 0 | 1 | unless $self->ping |
| 386 | 0 | 1 | if ($dbi->connect->err) |
| 396 | 0 | 1 | unless $self->ping |
| 410 | 0 | 1 | if ($dbi->connect->err) |
| 420 | 0 | 1 | unless $self->ping |
| 426 | 0 | 1 | if ($dbi->connect->err) |
| 436 | 0 | 2 | unless $self->ping |
| 443 | 0 | 2 | if ($dbi->connect->err) |
| 453 | 0 | 1 | unless $self->ping |
| 459 | 0 | 1 | if ($dbi->connect->err) |
| 474 | 0 | 0 | unless $self->ping |
| 481 | 0 | 0 | if ($dbi->connect->err) |