Branch Coverage

blib/lib/TableDataRole/Source/AOA.pm

Criterion	Covered	Total	%
branch	6	14	42.8

line	true	false	branch
20	0	2	unless my $column_names = delete $args{'column_names'}
21	0	2	unless my $aoa = delete $args{'aoa'}
22	0	2	if keys %args
40	3	0	if (wantarray) { }
51	0	62	unless $self->{'pos'} < @{$aoa;}
81	0	3	if $index < 0 and -$index > @{$self->{'aoa'};} or $index >= 0 and $index >= @{$self->{'aoa'};}
96	0	0	if $index < 0 and -$index > @{$self->{'aoa'};} or $index >= 0 and $index >= @{$self->{'aoa'};}