@array = sort { $a <=> $b } keys %{ { map { $_ => 0 } @array } };