automáticamente obtiene el índice de bucle en foreach loop en perl
Si tengo la siguiente matriz en Perl:
@x = qw(a b c);
e itero sobre él conforeach, luego$_ se referirá a la @ actuelement en la matriz:
foreach (@x) {
print;
}
imprimirá:
abc
Hay una forma similar de obtener elíndic del elemento actual, sin actualizar manualmente un contador? Algo como:
foreach (@x) {
print $index;
}
dónde$index se actualiza como$_ para producir la salida:
012