blib/lib/Tie/Hash/MultiValue.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 16 | 100.0 |
line | true | false | branch |
---|---|---|---|
116 | 1 | 5 | if @_ % 2 == 1 |
122 | 2 | 4 | if (exists $args{'unique'}) |
123 | 1 | 1 | if (defined $args{'unique'} and ref $args{'unique'} eq 'CODE') { } |
150 | 9 | 9 | if ($self->[1]{'Unique'}) { } |
155 | 2 | 7 | if grep {$self->[1]{'Unique'}->($_, $item);} @{$$self[0]{$key};} |
229 | 2 | 7 | unless exists $self->[0]{$key} |
233 | 3 | 4 | unless ($self->[1]{'iterators'} and $self->[1]{'iterators'}{$key}) |
244 | 3 | 4 | if ($current_index > $highest_index) { } |