[Perl] Pregunta #2 (fwd)

Jose Antonio Galicia jcgalici@cbbanorte.com.mx
Tue, 12 Mar 2002 13:51:40 -0600 (MXC)


On Tue, 12 Mar 2002, Alejandro G. Bedoya wrote:

> es: L=EDnea de MIENTRAS que no haya en REAL, deber=E1 de agregarse al R=
EAL.

>     El pseudo c=F3digo r=E1pido es...

	while (<REAL>) { $REAL{$_}=3D1 }
	while (<MIENTRAS>) { agregas if ! exists $REAL{$_} }

 O tal vez usar GDBM.

 Saludos,
 To=F1o
---
It is difficult to soar with the eagles when you work with turkeys.