... keys %{ map { $_ => undef }  @array };
                       # not 0