Branch Coverage

blib/lib/Class/Scaffold/Log.pm
Criterion Covered Total %
branch 12 36 33.3


line true false branch
32 3 0 @_ ? :
39 0 0 unless ref $self
42 0 0 if ($self->delegate->test_mode)
43 0 0 unless return $$self{'handle'} ||= 'IO::File'->new('>&STDOUT')
46 0 0 if (@_) { }
49 0 0 if ($self->filename) { }
50 0 0 unless $$self{'handle'} ||= 'IO::File'->new(sprintf('>>%s', $self->filename))
53 0 0 unless $$self{'handle'} ||= 'IO::File'->new('>&STDERR')
64 3 3 unless ref $self
68 1 5 if $level > $self->max_level
73 0 5 unless defined $format and $format ne ''
78 2 3 if $self->pid
79 3 2 if $self->timestamp
86 0 5 if ($self->delegate->test_mode) { }
0 5 elsif (defined $self->filename and length $self->filename) { }
89 0 0 unless open $fh, '>>', $self->filename
91 0 0 unless print $fh $msg
93 0 0 unless close $fh