[Perl] Re: Lectura de Archivo.

[Francisco Valladolid Hdez.]

>> Message: 1
>> Date: Thu, 11 May 2006 12:25:45 -0500
>> From: "Fredy Gonzales P." <fredyg en negosat.com>
>> Subject: [Perl] Lectura de Archivo
>>
>> 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.

Podrías dar mas detalles de lo que deseas, hacer, .. quiza necesitarias,
definir el tipo de archivo que quieres leer, .. o puedes usar "tags"
dentro del archivo, etc. algo asi, algun marcador que nos sirva de
referencia para nuestra tarea.

Saludos.

>>
>> Aqui un ejemplo
>>
>> #!/usr/bin/perl -w
>>
>> $LOGFILE = "DATOS.TXT";
>> open(LOGFILE) or die("Could not open log file.");
>
>
> Esto podrías hacerlo sencillamente
> open (LOGFILE, "DATOS:TXT") or die  ("No se puede abrir el archivo");
>
> 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..
>
>
> ¿Por que no intentas usar expresiones regulares para definir tus bloques?
>
>           # Mi pregunta...es puedo hacer otro foreach solo para leer este
>> bloque.
>
>
> Claro que puedes hacer otro foreach, no hay ningún problema en ese
> sentido.
> Pero no sería más sencillo guardar lo que te interesa en otra estructura,
> tal vez una hash con llaves que te ayuden a ver más fácilmente tus
> bloques.
>
>         }
>>
>>
>> }
>>
>>
>>
> ¿Qué es lo que intentas hacer?  Tal vez hay una forma más fácil de
> lograrlo.
> _______________________________________________
> Perl mailing list
> Perl en tlali.iztacala.unam.mx
> http://tlali.iztacala.unam.mx/cgi-bin/mailman/listinfo/perl
>