[Programación] Re: [Programación] (no subject)

Jose Luis Diaz programacion@lugro.org.ar
Mon, 29 Dec 2003 19:00:23 -0300


-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

On Monday 29 December 2003 15:46, Federico Wiecko wrote:
> 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

Vos lo que queres hacer intutivamente es cambiar a donde apunta un array, no 
se si se puede hacer, lo que si podes hacer es

$arr=$uno{'bb'};
print @$arr[1]; # desreferenciando al escalar como si fuera un array

- -Jx

- -- 
José Luis Diaz - jose@citynet.net.ar            /"\  ASCII Ribbon Campaign
GNU/Linux Registered User #138499               \ /  No HTML in mail or news!
RTFM! - http://rtfm.org.ar                       X
"Kernel Panic - No signature found"             / \
- --
PGPkey: http://pgp.mit.edu:11371/pks/lookup?op=get&search=0x7BCD2757
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.6 (GNU/Linux)
Comment: For info see http://www.gnupg.org

iD8DBQE/8KP4M4NSjXvNJ1cRAsCQAJ4mELCnUJveUnh/Uc5r0FIbEoawzQCeIbx2
9979LCaBSBGueU4AeXDQ+LU=
=I2S6
-----END PGP SIGNATURE-----