%hash = map { get_a_key_for($_) => $_ } @array;