Branch Coverage

blib/lib/Log/WarnDie.pm
Criterion Covered Total %
branch 12 34 35.2


line true false branch
114 1 0 if ($DISPATCHER)
115 0 0 unless $LAST and @$LAST == @_ and join('', @$LAST) eq join('', @_)
119 1 0 if ($Log::WarnDie::STDERR)
141 1 0 if ($DISPATCHER)
142 0 0 unless $LAST and @$LAST == @_ and join('', @$LAST) eq join('', @_)
146 1 0 if ($Log::WarnDie::STDERR)
202 0 4 unless $Log::WarnDie::STDERR->fdopen(fileno STDERR, 'w')
215 0 0 if ($DISPATCHER)
217 0 0 if (ref($DISPATCHER) =~ /^Log::Log4perl/) { }
223 0 0 $WARN ? :
235 0 4 if ($DISPATCHER)
237 0 0 if (ref($DISPATCHER) =~ /^Log::Log4perl/) { }
243 0 4 $DIE ? :
276 3 1 unless @_ > 1
285 1 0 if ($DISPATCHER)
286 1 0 if ($DISPATCHER->isa('Log::Dispatch'))
289 1 0 if (my $outputs = $Log::WarnDie::DISPATCHER->{'outputs'})