Branch Coverage

blib/lib/DWH_File/Tie/Array.pm
Criterion Covered Total %
branch 21 36 58.3


line true false branch
37 0 0 if ($data)
47 0 2 unless $$self{'size'}
56 0 3 unless @_
89 0 11 if ($offset > $$self{'size'}) { }
0 11 elsif ($$self{'size'} == 0) { }
94 0 11 if ($last >= $$self{'size'})
98 6 5 if ($insert_length) { }
5 0 elsif ($length) { }
99 6 0 if ($last < $$self{'size'} - 1 and $offset < $$self{'size'} and $insert_length != $length)
112 5 0 if ($last < $$self{'size'} - 1)
120 1 10 if wantarray
132 15 0 if (my $node = $self->get_node($subscript)) { }
148 0 11 if ($start + $amount < 0)
149 6 5 if ($amount < 0) { }
5 0 elsif ($amount > 0) { }
177 0 28 if ($blessing ne 'ARRAY')
183 0 14 unless (defined $tail)
201 65 15 if ($index >= $self->FETCHSIZE)