¿Es seguro en Perl eliminar una clave de una referencia hash cuando hago un bucle en el mismo hash? ¿Y por qué?

Question

Básicamente quiero hacer esto:

foreach my $key (keys $hash_ref) { 

    Do stuff with my $key and $hash_ref 

    # Delete the key from the hash 
    delete $hash_ref->{$key}; 
} 

¿Es seguro? ¿Y por qué?

Answer 1

Usted no está interactuando sobre el hash, que estés interactuando sobre la lista de claves devueltas por keys, incluso antes de empezar un bucle porque

for my $key (keys %$hash_ref) { 
    ... 
} 

es aproximadamente el mismo que

my @anon = keys %$hash_ref; 
for my $key (@anon) { 
    ... 
} 

Eliminar del hash no causa ningún problema.

---

each, por el otro, qué repetir un hash. Cada vez que se llama, each devuelve un elemento diferente. Sin embargo, todavía es seguro para delete el elemento actual!

# Also safe 
while (my ($key) = each(%$hash_ref)) { 
    ... 
    delete $hash_ref->{$key}; 
    ... 
} 

Si se añaden o eliminan elementos de un hash al iterar sobre ella, las entradas pueden ser omitidos o duplicados - así que no hacer eso. Excepción: siempre es seguro eliminar el elemento devuelto más recientemente por cada()

Answer 2

Es seguro, porque keys %hash proporciona toda la lista una vez, antes de comenzar a iterar. foreach luego continúa trabajando en esta lista pregenerada, sin importar lo que cambie dentro del hash real.

Se come tu memoria, porque mantienes toda la lista hasta que termines.