Branch Coverage

blib/lib/Circle/Loggable.pm
Criterion Covered Total %
branch 1 58 1.7


line true false branch
44 8 0 unless $self->setting_log_enabled
45 0 0 if $NO_LOG
48 0 0 if eval { do { my $logger = $self->logger($time); my $ctx = $$self{'logctx'}; $logger->log($ctx, $time, $event, $args); 1 } }
80 0 0 unless @pcs
97 0 0 unless defined $limit
102 0 0 if $path_upper > $path_used
110 0 0 exists $formats{$2} ? :
115 0 0 unless $timestamp[3]
124 0 0 $ts_used{$_} ? :
125 0 0 $ts_used{$_} ? :
152 0 0 if (defined $$self{'logpath'} and $$self{'logpath'} ne $path)
155 0 0 if (defined $$self{'loguntil'} and $time >= $$self{'loguntil'})
161 0 0 unless (-d $dir)
162 0 0 unless make_path($dir, {'mode', 448})
168 0 0 unless (defined $$self{'logpath'})
185 0 0 unless my $logger = $LOGGER_FOR_PATH{$$self{'logpath'}}
188 0 0 unless ($logger->refcount)
209 0 0 if ($self->_setting_log_enabled_inherits) { }
0 0 elsif ($self->setting_log_enabled) { }
210 0 0 $self->setting_log_enabled ? :
219 0 0 if ($self->setting_log_enabled)
265 0 0 'Logging inherited (currently ' . $self->setting_log_enabled ? :
280 0 0 unless (rename $$self{'logpath'}, $path)
304 0 0 unless CORE::open my $fh, '>>', $path
326 0 0 if $$self{'refcount'}
337 0 0 if length $ctx->path_residue
354 0 0 if (not ref $args) { }
0 0 elsif (ref $args eq 'HASH') { }
0 0 elsif (ref $args eq 'ARRAY') { }