En Perl es muy fácil anidar arreglos dentro de arreglos, por lo que podemos crear matrices N-dimensionales, como ya mencionamos en la sección 2.3. Hay varias maneras de crearlas y consultarlas, que os mostraré con ejemplos:
my @matriz2_3 = ( [1,2,"tres"], ## declaracion con asignacion explicita
[4,5,"seis"]);
my @matriz;
for($i=0;$i<5;$i++) ## asignacion elemento a elemento desde bucles
{
for($j=0;$j<10;$j++)
{
$matriz[$i][$j] = $i * $j;
}
}
for $i ( 1 .. 10 ) ## asignacion de filas enteras
{
# ambas expresiones son validas
push( @matriz , [ @dimension ];
$matriz[$i] = [ @dimension ];
# $matriz[$i] contiene una referencia a un arreglo
}
while(<ARCHIVO>) ## leyendo un archivo
{
push( @matriz , split(/\s+/,$_);
}
Bruno Contreras-Moreira