| lib/DBI/Log.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 26 | 61.5 |
| line | true | false | branch |
|---|---|---|---|
| 96 | 0 | 1 | if (not $opts{'file'}) { } |
| 101 | 0 | 1 | if ($file2 =~ m[^~/]) |
| 105 | 0 | 1 | unless open $opts{'fh'}, ">>", $file2 |
| 122 | 8 | 7 | if ($package eq "DBI::Log") |
| 124 | 2 | 6 | if ($mcount > 1) |
| 143 | 4 | 5 | if ($package eq "DBI::Log") |
| 146 | 0 | 5 | if ($opts{'exclude'}) |
| 148 | 0 | 0 | if ($package =~ /^$item(::|$)/) |
| 156 | 4 | 0 | unless ($opts{'trace'}) |
| 165 | 4 | 0 | if $sub eq "DBI::Log::__ANON__" |
| 169 | 4 | 0 | if ($dbh) |
| 182 | 2 | 3 | if $log->{'skip'} |
| 183 | 0 | 3 | if ($opts{'timing'}) |