my @array = (1,1,2,3,2,2);
my %temp = map { $_ => 1 } @array;
my @unique = keys %temp;