[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: Duda de Perl->regexp



Amaya wrote:
Y como podría hacer para que leyera una línea de un archivo y otra de
otro de forma iterativa? Es que los while estos no me valen :-(
Primero se lee un archivo entero y luego el otro, por lo tanto sólo me
encuentra una coincidencia única.


No se como son tus cadenas y lo que quieres hacer exactamente, pero se me ocurre que puedes meter el resultado para cada archivo en un array (1 línea por elemento), algo del estilo

@file1=();
@file2=();
while(<FILE1>){
	@file1=(@file1,chomp($_));
}
while(<FILE2>){
	@file2=(@file2,chomp($_));
}

y luego comparar los elementos de uno con los del otro	

foreach $infile1 ( @file1 ){
	# Buscas lo que quieres para cada cadena
	foreach $infile2 ( @file2 ){
	#	y lo comparas con cada cadena de la otra.
	}
}

--
=====================================================================
Agustin Martin Domingo, Dpto. de Fisica, ETS Arquitectura Madrid,
(U. Politecnica de Madrid)  tel: +34 91-336-6536, Fax: +34 91-336-6554,
email:agmartin@aq.upm.es, http://corbu.aq.upm.es/~agmartin/welcome.html



Reply to: