[Perl] como saltar a una linea especifica?

Gabriel Lopez Nunez galo@liceaga.facmed.unam.mx
Tue, 11 Dec 2001 16:04:00 -0600 (CST)


Hola lista, miren tengo lo siguiente para leer un archivo de texto:

            while(<FILE>){
              chomp();
              next unless /KBytes/;
              seek(FILE,10,1);
              last;
            }

Estoy buscando la palabra "kbytes" en cada linea, una vez encontrada
quiero saltarme 10 o n lineas adelante, lo ideal seria que seek me enviara
derechito a la linea que quiero para no seguir sangrando el ciclo, pero
no lo hace. Alguien sabe como hacerlo? (sin que suene a frase politica).

Segun lei seek lo hacia, pero creo que entendi mal. El 1 me posiciona en
la linea actual y el 10 es sumado para que me lleve 10 lineas adelante.

Saludos y gracias.