Branch Coverage

blib/lib/Hash/AutoHash/Args.pm
Criterion Covered Total %
branch 28 32 87.5


line true false branch
70 0 17 if @args == 1 and 'ARRAY' eq ref $args[0]
75 12 5 wantarray ? :
82 5 1 wantarray ? :
86 4 8 if (@_ == 2 and 'ARRAY' eq ref $_[0] and 'ARRAY' eq ref $_[1]) { }
106 3 85 if @args == 1 and 'ARRAY' eq ref $args[0]
107 6 82 if @args == 1 and 'HASH' eq &reftype($args[0])
108 0 88 if @args % 2
112 133 43 unless exists $args->{$keyword}
116 33 10 unless 'ARRAY' eq ref $old
124 0 688 unless defined $keyword
125 688 0 unless ref $keyword
127 204 445 wantarray ? :
130 4 3 if not @_ % 2
131 4 3 unless @_ % 2
156 108 5 @_ == 1 ? :
165 18 273 unless exists $self->{$keyword}