Branch Coverage

blib/lib/Tie/Array/Pointer.pm
Criterion Covered Total %
branch 11 20 55.0


line true false branch
18 0 1 if ($self->address) { }
22 0 1 unless $addr
32 1 0 if ($$self{'allocated'})
44 0 1 if ($type eq 'c' or $type eq 'C') { }
0 1 elsif ($type eq 's' or $type eq 'S') { }
1 0 elsif ($type eq 'l' or $type eq 'L') { }
68 0 1 if ($type eq 'c' or $type eq 'C') { }
0 1 elsif ($type eq 's' or $type eq 'S') { }
1 0 elsif ($type eq 'l' or $type eq 'L') { }
108 1 1 if ($n < $$self{'length'}) { }