Hola, a ver alguno que este canchero con Perl, si me puede sacar esta duda
#!/usr/bin/perl -w
%uno= ( 'aa' => [1,2], 'bb' => [3,4]);
print $uno{'bb'}[0]   #muestra el 3 
#ahora haciendo
@arr=$uno{'bb'};
print $arr[0];        #es undefined
Hace rato que no programo en Perl y no quiero gastar neuronas ;-)
Gracias !