| blib/lib/DBIx/DSN/Resolver.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 20 | 90.0 |
| line | true | false | branch |
|---|---|---|---|
| 13 | 0 | 3 | @_ == 1 ? : |
| 17 | 1 | 11 | unless $ipaddr |
| 27 | 0 | 15 | unless $dsn |
| 29 | 1 | 14 | unless my($scheme, $driver, $attr_string, $attr_hash, $driver_dsn) = 'DBI'->parse_dsn($dsn) |
| 40 | 4 | 10 | exists $driver_hash{'hostname'} ? : |
| 42 | 1 | 13 | unless $host |
| 45 | 2 | 11 | if ($host =~ /:(\d+)$/) |
| 50 | 1 | 12 | unless my $ipaddr = $$self{'resolver'}($host) |
| 54 | 22 | 3 | defined $driver_hash{$_} ? : |
| 55 | 2 | 10 | defined $attr_string ? : |