Branch Coverage

blib/lib/Carp/Datum.pm
Criterion Covered Total %
branch 46 92 50.0


line true false branch
93 2 2 if ($sym eq 'on') { }
2 0 elsif ($sym eq 'off') { }
98 2 2 if $Carp::Datum::DBG
115 0 0 unless $Carp::Datum::DBG
125 0 0 unless $dump_parser == 1
139 9 5 unless $Carp::Datum::DBG and $Carp::Datum::CFG->check_debug(1)
224 3 2 unless $Carp::Datum::DBG and $Carp::Datum::CFG->check_debug(2)
231 0 6 wantarray ? :
6 3 unless $Carp::Datum::DBG and $Carp::Datum::CFG->check_debug(2)
235 0 3 if $#_ == -1
239 0 3 wantarray ? :
241 0 3 wantarray ? :
245 0 0 unless $Carp::Datum::DBG and $Carp::Datum::CFG->check_debug(2)
255 0 0 wantarray ? :
274 0 4 if $Carp::Datum::DBG and not $Carp::Datum::CFG->check_debug(32)
279 0 4 if (ref $_[0] eq 'HASH') { }
281 0 0 if (defined $$hashref{-'level'})
284 0 0 if (defined $$hashref{-'marker'})
289 2 2 if ($_[0] =~ /^\d+$/)
291 2 0 if ($#_ > 0)
297 2 2 if ($Carp::Datum::DBG)
299 0 2 unless $Carp::Datum::CFG->check_trace($level)
310 1 1 unless defined %Carp::Datum::logmap
329 2 0 if (defined $entry) { }
331 1 1 defined $loglvl ? :
345 0 0 unless $Carp::Datum::DBG
348 0 0 unless $dbg_flag & 8
357 4 2 unless $Carp::Datum::DBG
360 0 2 unless $dbg_flag & 4
382 4 2 unless $Carp::Datum::DBG
385 0 2 unless $dbg_flag & 16
420 12 0 if $test
435 0 0 if @_
436 0 0 if $expr ne ''
444 0 0 if ($Carp::Datum::DBG)
446 0 0 if ($debug_flag & 128)
460 0 0 if ($debug_flag & 64) { }
477 0 0 if (substr($name, 0, length $x) eq $x)
520 1 4 $sub ? :
522 4 1 if defined $line
531 0 5 @_ ? :
533 4 1 if (@caller) { }
536 0 4 if ($max_arg >= 0 and $#DB::args >= $max_arg)
542 0 4 if $shrinked
586 0 6 unless defined $_[0]
588 6 0 if ref $_[0] or $_[0] =~ /^-?[1-9]\d{0,8}$/ or $_[0] + 0 eq $_[0]