create a hash,ref { }

dereference same hash,ref %{ { } }

keys likes it

use Data::Dump;
dd( keys %{{ map { $_,1 } 1,2,1,2,1,4 }} );
__END__
(4, 1, 2)
[download]

List::AllUtils :)