(map { $_ => 1 } @array)

##</code><code>##

my @unique = keys (1,1,2,3,2,2);

##</code><code>##

my @unique = keys @array;