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: