my @unique = keys { map { $_ => 1 } @array };