Branch Coverage

blib/lib/autobox/Core.pm
Criterion Covered Total %
branch 103 122 84.4


line true false branch
1245 1 1 $_[2] ? :
1257 1 1 if @_ == 2
1264 2 3 if @_ == 2
1275 1 1 @ms ? :
1276 1 1 @ms ? :
1277 1 1 wantarray ? :
1279 3 1 $_[0] =~ s/$_[1]/$_[2]/ ? :
1280 0 4 if (Want::want('LIST')) { }
2 2 elsif (Want::want('BOOL')) { }
1 1 elsif (Want::want('SCALAR')) { }
1310 4 1 $_[0] < $_[1] ? :
1311 1 4 wantarray ? :
1314 1 1 wantarray ? :
1318 1 1 wantarray ? :
1345 2 0 if $_[0]
1351 0 1 unless $_[0]
1373 0 25 unless defined $size
1374 25 0 defined $size ? :
1375 4 21 defined $char ? :
1377 0 25 if (CORE::length $char > 1)
1385 5 20 if $size <= $len
1400 6 3 unless defined $trim_charset
1409 6 3 unless defined $trim_charset
1435 5 1 if &Scalar::Util::looks_like_number($_[0])
1436 5 1 if &Scalar::Util::looks_like_number($_[0])
1437 6 0 if &Scalar::Util::looks_like_number($_[0])
1439 3 1 if &Scalar::Util::looks_like_number($_[0])
1462 0 0 wantarray ? :
1471 1 2 wantarray ? :
1475 1 1 wantarray ? :
1532 2 2 wantarray ? :
1545 0 2 if grep {CORE::ref $_;} CORE::values %{$_[0];}
1547 1 1 wantarray ? :
1573 3 6 if (CORE::ref $filter eq 'Regexp') { }
2 4 elsif (not CORE::ref $filter) { }
1581 2 7 wantarray ? :
1589 1 2 wantarray ? :
1594 3 1 wantarray ? :
1600 2 4 wantarray ? :
1633 9 1 if $_ > $max
1643 0 10 if $_ < $min
1656 1 2 wantarray ? :
1662 1 3 wantarray ? :
1668 0 0 wantarray ? :
1674 0 1 wantarray ? :
1710 8 0 defined $_ ? :
1711 0 1 wantarray ? :
1730 1 2 if (@_ == 1) { }
1 1 elsif (CORE::ref $filter eq 'Regexp') { }
0 1 elsif (not CORE::ref $filter) { }
1789 3 2 wantarray ? :
1797 2 2 wantarray ? :
1804 3 4 defined $_[1] ? :
1806 0 7 if $first < 0
1809 5 2 wantarray ? :
1813 1 2 if (@_ == 1) { }
1819 1 1 CORE::ref $arg eq 'Regexp' ? :
1822 2 10 if &$filter($array->[$i])
1830 1 2 if (@_ == 1) { }
1836 1 1 CORE::ref $arg eq 'Regexp' ? :
1839 2 0 if &$filter($array->[$i])