Branch Coverage

blib/lib/Iterator/Flex/Take.pm
Criterion Covered Total %
branch 18 28 64.2


line true false branch
71 0 13 unless defined $n and &Scalar::Util::looks_like_number($n) and int $n == $n and $n >= 0
87 0 13 unless Ref::Util::XS::is_hashref($state)
97 0 13 if defined $array
135 7 6 if ($lazy) { }
159 16 95 if $iterator_state == 1 or $took == $n
165 5 90 if not $value and $src->$is_exhausted
185 4 0 if defined $current
196 20 0 defined $current ? :
201 10 102 if $iterator_state == 1
204 14 88 unless (defined $array)
217 0 14 unless (eval { do { $array = []; push @$array, $src->next; push @$array, $src->next until @$array == $n; 1 } })
218 0 0 unless Ref::Util::XS::is_blessed_ref($@) and $@->isa("Iterator::Flex::Failure::Exhausted")
222 0 0 unless (@$array)
234 10 78 if ($next == $len)