[caracas-pm] Re: Uso de estructuras complejas de datos

[Juan Jose Natera Abreu]

Hola,


>  %bar = {"Administrativo" => { $ci_adm[$i] => $jub_adm[$i] },
>          	"Docente" => { $ci_doc[$j] => $jub_doc[$j]},
>  		"Obrero" => { $ci_obr[$k] => $jub_obr[$k]}
>  		};
>  #----------------

%bar es un hash, por que le asignas un hash anonimo?

purdes hacer:

%hash = (
	...
);

o

$harf_ref = {

};

Pero no puedes mezclarlas.

>  Como ven %bar es un hash que contiene otro hash dentro y lo almacena
>  como una referencia
> 
> Luego quiero recuperarlos y en el libro que tengo aparece algo parecido
> a los suiguiente:
> 
> #----------------
> $foo_adm = $bar{"Administrativo"}{$ci_adm[$i]};
> $foo_doc = $bar{"Docente"}{$ci_doc[$j]};
> $foo_adm = $bar{"Obrero"}{$ci_obr[$k]};
> #----------------

Prueba esto:

%bar = (
    "Administrativo" => { $ci_adm[$i] => $jub_adm[$i] },
    "Docente" => { $ci_doc[$j] => $jub_doc[$j]},
    "Obrero" => { $ci_obr[$k] => $jub_obr[$k]}
);

# usa el operador de flecha para desreferenciar

print $bar{'Administrativo'}->{13290489};


Saludos,
-- 
Juan Jose Natera Abreu <juanjose at lunarpages.com>