| blib/lib/Class/DBI/BaseDSN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 10 | 70.0 |
| line | true | false | branch |
|---|---|---|---|
| 12 | 0 | 4 | unless grep {'Class::DBI::BaseDSN' eq $_;} @$isa |
| 14 | 0 | 4 | unless $dsn =~ /^(?:dbi:)?([^:]+)/i |
| 19 | 3 | 1 | unless (eval "require $backend; 1") |
| 27 | 2 | 1 | unless $@ =~ /^Can't locate \Q$file\E\.pm / |
| 36 | 2 | 0 | if $_ eq 'Class::DBI::BaseDSN' |