Branch Coverage

blib/lib/Array/Iterator.pm
Criterion Covered Total %
branch 43 44 97.7


line true false branch
89 2 29 unless @array
93 11 18 if (scalar @array == 1) { }
94 4 7 if (ref $array[0] eq 'ARRAY') { }
6 1 elsif (ref $array[0] eq 'HASH') { }
98 2 4 unless exists $array[0]{'__array__'}
100 1 3 unless ref $array[0]{'__array__'} eq "ARRAY"
122 2 26 unless defined $length and defined $iteratee
142 1 215 unless UNIVERSAL::isa((&CORE::GLOBAL::caller())[0], __PACKAGE__)
155 1 79 unless UNIVERSAL::isa((&CORE::GLOBAL::caller())[0], __PACKAGE__)
164 1 206 unless UNIVERSAL::isa((&CORE::GLOBAL::caller())[0], __PACKAGE__)
182 0 79 unless UNIVERSAL::isa((&CORE::GLOBAL::caller())[0], __PACKAGE__)
220 75 8 if (not defined $n) { }
1 7 elsif (not $n) { }
1 6 elsif ($n < 0) { }
230 61 20 $idx < $self->{'_length'} ? :
253 1 59 unless $self->{'_current_index'} < $self->{'_length'}
286 6 18 unless $self->{'_current_index'} < $self->{'_length'}
324 22 13 if (not defined $n) { }
1 12 elsif (not $n) { }
1 11 elsif ($n < 0) { }
330 7 26 unless $idx < $self->{'_length'}
357 63 5 $self->{'_current_index'} != 0 ? :