blib/lib/DBIx/RewriteDSN.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 18 | 27.7 |
line | true | false | branch |
---|---|---|---|
16 | 2 | 1 | if ($opts{-'file'}) |
20 | 0 | 3 | if ($opts{-'rules'}) |
24 | 1 | 2 | if ($RULES and $ENV{'DBI_REWRITE_DSN'}) |
54 | 0 | 0 | unless $_ |
55 | 0 | 0 | if $_ =~ /^#/ |
58 | 0 | 0 | if ($dsn =~ /$match/) |
65 | 0 | 0 | if ($new_dsn and $new_dsn ne $dsn) { } |
66 | 0 | 0 | if ($ENV{'DBI_REWRITE_DSN'} || '') eq 'verbose' |
69 | 0 | 0 | if ($ENV{'DBI_REWRITE_DSN'} || '') eq 'verbose' |