Tablas de tablas, Hashes of hashes

Las tablas de tablas son también sencillas de manejar, de forma muy parecida a los arreglos de arreglos.

my %blosum62 = (                ## declaracion con asignacion explicita
	'A' => 
	{
		'A' => -4,
		'R' => -1,
		...
		'X' => -1
	}
	
	...
	
	'X' => 
	{
		'A' => --,
		'R' => -1,
		...
		'X' => -1
	}
);


my %tabla;

for($i=0;$i<5;$i++)             ## elemento a elemento desde bucles
{
	for($j=0;$j<10;$j++)
	{
		$tabla{$i}{$j} = $i * $j;
	}
}


for $i ( 1 .. 10 )              ## asignacion de subtablas enteras
{
	$tabla[$i] = { %subtabla }; 
	# tabla[$i] contiene una referencia a una tabla
}

Bruno Contreras-Moreira
http://www.eead.csic.es/compbio