[Perl] Lectura de Archivo

Fredy Gonzales P. fredyg en negosat.com
Jue Mayo 11 12:25:45 CDT 2006


Amigos :

Soy nuevo en Perl, pero no en programacion, asi que estoy aqui por una 
problema

Estoy leyendo un archivo secuencialmente, pero existe partes donde tengo que 
volver a leer la siguiente linea sin necesidad de llegar al final,
cual es la instruccion con la cual tengo que ir a la inicio de la siguiente 
lectura.

Aqui un ejemplo

#!/usr/bin/perl -w

$LOGFILE = "DATOS.TXT";
open(LOGFILE) or die("Could not open log file.");
foreach $line (<LOGFILE>) {
    chomp($line);

     if ($line =~ /\Bloque1/)
        {

          #Aqui cuando ingreso al bloque1, tengo que leer una cuantas lineas 
hasta llegar al final del bloque y continuar con el otro bloque..

          # Mi pregunta...es puedo hacer otro foreach solo para leer este 
bloque.

        }


}



Espero que se entienda



Gracias



FredyG




Más información sobre la lista de distribución Perl