Branch Coverage

blib/lib/Earth.pm
Criterion Covered Total %
branch 34 52 65.3


line true false branch
49 0 1 !%{$_[0];} ? :
2 1 @_ % 2 ? :
1 3 @_ == 1 && ref $_[0] eq 'HASH' ? :
0 4 !@_ ? :
56 0 21 if ($next and UNIVERSAL::isa($invocant, "CODE"))
59 8 13 if ($next and &Scalar::Util::blessed($invocant))
60 8 0 if UNIVERSAL::can($invocant, $routine)
63 3 10 if ($next and ref $invocant eq "SCALAR")
64 3 0 if UNIVERSAL::can($$invocant, $routine)
67 10 0 if ($next and UNIVERSAL::can(load($invocant), $routine))
71 0 0 if ($next and UNIVERSAL::can($invocant, "AUTOLOAD"))
79 0 1 unless @_
80 1 0 ref $_[0] ? :
86 0 3 unless $invocant
87 2 5 ref $_ eq 'ARRAY' ? :
97 2 1 if (@$frames > 1)
115 8 2 if ($cached->{$package})
119 0 2 if ($package eq "main")
126 2 0 unless $failed
130 2 0 unless $loaded
131 2 0 unless $loaded
136 0 2 if $error or $failed or not $loaded
147 0 6 unless @_
168 1 14 if defined $limit and $i + 1 == $offset + $limit
181 0 7 unless $package
186 4 13 @_ ? :