Una diferencia del bucle for de Perl con el de C es que el índice
del bucle constituye un ''alias'' del correspondiente elemento del array,
de modo que su modificación conlleva la modificación del elemento del array.
Consideremos el siguiente código:
lhp@nereida:~/Lperl/src$ cat -n foreach1.pl
     1  #!/usr/bin/perl -w
     2  use strict;
     3
     4  my @list = 1..10;
     5  foreach my $n (@list) {
     6   $n *= 2;
     7  }
     8  print "@list\n";
su ejecución produce la siguiente salida:
lhp@nereida:~/Lperl/src$ foreach1.pl
2 4 6 8 10 12 14 16 18 20
Casiano Rodríguez León

Principios de Programación Imperativa, Funcional y Orientada a Objetos Una Introducción en Perl/Una Introducción a Perl
por Casiano Rodríguez León 
is licensed under a Creative Commons Reconocimiento 3.0 Unported License.
Permissions beyond the scope of this license may be available at http://campusvirtual.ull.es/ocw/course/view.php?id=43.
2012-06-19