Branch Coverage

blib/lib/HashDataRole/Source/Hash.pm

Criterion	Covered	Total	%
branch	12	20	60.0

line	true	false	branch
17	0	1	unless my $hash = delete $args{'hash'}
19	0	1	if keys %args
37	1	4	unless $self->{'pos'} < @{$self->{'_keys'};}
64	0	2	if ($pos < 0) { }
65	0	0	unless -$pos <= @{$self->{'_keys'};}
67	1	1	unless $pos < @{$self->{'_keys'};}
75	0	2	if ($pos < 0) { }
76	0	0	-$pos <= @{$self->{'_keys'};} ? :
78	1	1	$pos < @{$self->{'_keys'};} ? :
84	1	1	unless exists $self->{'hash'}{$key}