| blib/lib/Device/Modem/Log/File.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 14 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 41 | 0 | 0 | if (open $LOGFILE, '>>' . $self->{'file'}) { } |
| 62 | 0 | 0 | if (exists $ENV{'TEMP'} or exists $ENV{'TMP'}) |
| 73 | 0 | 0 | unless (-d File::Basename::dirname($self->{'file'})) |
| 84 | 0 | 0 | if (defined $newlevel) { } |
| 86 | 0 | 0 | unless (exists $levels{$newlevel}) |
| 101 | 0 | 0 | if ($levels{$level} <= $levels{$self->{'loglevel'}}) |
| 103 | 0 | 0 | if (my $fh = $self->fh) { } |