blib/lib/List/Unique/DeterministicOrder.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 16 | 75.0 |
line | true | false | branch |
---|---|---|---|
28 | 3 | 1 | if (my $data = $args{'data'}) |
32 | 0 | 3 | if (scalar CORE::keys %hash != scalar @$data) { } |
61 | 1 | 7 | wantarray ? : |
65 | 3 | 6 | if exists $_[0][1]{$_[1]} |
99 | 3 | 0 | if ($move_key ne $key) |
121 | 1 | 1 | if ($move_key ne $key) |
152 | 0 | 2 | if $array_len != $hash_len |
156 | 0 | 10 | unless exists $self->[1]{$key} |