Hola, tengo el siguiente
script para leer la información entre dos lineas desde un TXT pero, ¿cómo puedo hacer para ir leyendo cada línea que me entrega el
script? Ya que me entrega la totalidad de las líneas, pero necesito recorrerlas...
Archivo TXT:
Using text Syntax Highlighting
INICIO
hola
como
estas
tanto
tiempo
FINAL
cuando
te
volveré
a ver
nuevamente
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
Using perl Syntax Highlighting
#!perl -w
use strict;
use autodie;
open my $in,'<',"File1.txt";
while(<$in>){
print $out $_ if /^INICIO/ .. /^FINAL/;
}
Coloreado en 0.003 segundos, usando
GeSHi 1.0.8.4
me devuelve:
Using text Syntax Highlighting
inicio
hola
como
estas
tanto
tiempo
fin
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
y lo que necesito es ir recorriendo cada línea para ir asignando "hola", "como", "estas", etc. a distintas variables.