[Perl] Pregunta #3

[Jose Antonio Galicia]

On Tue, 12 Mar 2002, Mercado Benavides  Andres wrote:

>    Si solo quieres eliminar repetidos, no funcionaria
> hacer dos hashes y unirlos?, es decir;

> @lista =3D (@reales, @mientras);
> %hash1 =3D @lista;		#me aseguro que @lista[2n] sean unicos

 No funciona as=ED, ve:

	perl -e '@a=3D(1,2,3,4); %x=3D@a; for (keys %x) {print "$_ =3D $x{$_}\n"=
}'

 en todo caso ser=EDa:

	perl -e '@a=3D(1,2,3,4); @x{@a}=3D(); for (keys %x) {print "$_ =3D $x{$_=
}\n"}'

> Espero que te sea util.

 idem.

 Saludos,
 To=F1o
---
Romance, like alcohol, should be enjoyed, but should not be allowed to
become necessary.
		-- Edgar Friedenberg