Branch Coverage

blib/lib/Log/Report/Dispatcher.pm
Criterion Covered Total %
branch 44 74 59.4


line true false branch
44 0 0 $type->isa('Log::Dispatch::Output') ? :
33 0 $predef_dispatchers{$type} ? :
49 0 33 if $@
74 0 33 ref $f eq 'CODE' ? :
0 33 unless $self->{'format_reason'} = ref $f eq 'CODE' ? $f : $format_reason{$f}
79 0 33 if (my $cs = delete $args->{'charset'})
80 0 0 unless my $enc = &find_encoding($cs)
92 0 33 if $self->{'closed'}++
97 15 0 unless &in_global_destruction()
118 0 33 unless defined $mode
122 18 15 unless $self->isa('Log::Report::Dispatcher::Try')
133 0 0 @_ ? :
142 0 33 if $self->{'disabled'}
145 27 6 unless @_
162 0 10 unless my $code = $Log::Report::Dispatcher::reason_code{$reason}
178 0 10 defined $msg->msgid ? :
181 0 10 if $locale and $locale ne $oldloc
185 2 8 $opts->{'errno'} ? :
187 0 1 $e ? :
7 1 $r ? :
2 8 $r && $e ? :
193 9 1 defined $format ? :
200 3 7 if ($show_loc)
201 3 0 if (my $loc = $opts->{'location'} || $self->collectLocation)
211 0 10 if ($show_stack)
221 0 10 if $locale and $locale ne $oldloc
238 3 19 unless defined $pkg
265 16 0 @$args ? :
281 0 19 ref $params[0] && $call =~ /^(.*\:\:)/ && UNIVERSAL::isa($params[0], $1) ? :
285 0 19 if (@params > $maxparams)
299 8 19 if $abstract > 2
305 11 0 if $total <= $max
325 0 27 if (defined $obj) { }
336 0 32 unless defined $param
339 0 32 if ref $param
342 8 24 if $param =~ /^[+-]?(?:\d+(?:\.\d*)?|\.\d+)(?:[eE][+-]?\d+)?$/
346 0 24 if (length $escaped > 80)