| blib/lib/Devel/PerlySense/Util/Log.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 2 | 8 | 25.0 |
| line | true | false | branch |
|---|---|---|---|
| 57 | 0 | 172 | if @aHistoryMessage > $maxCountHistory |
| 60 | 172 | 0 | if $0 =~ /\.t$/ |
| 62 | 0 | 0 | unless $fileDebug ||= do { my $oHome = 'Devel::PerlySense::Home'->new; file($oHome->dirHomeLog, 'debug.log') } |
| 68 | 0 | 0 | unless open my $fh, '>>', $fileDebug |