Foro - Perl en Español

Estimados, tengo el siguiente problema:

Deseo imprimir la penúltima línea de un archivo de texto. Ejemplo:



Yo necesito imprimir "muy".

Estoy trabajando sobre SO Debian.

Favor, estimados, su apoyo en este tema.

Muchas gracias.

Bueno, hay muchas formas de hacerlo. Aquí hay una de ellas:


Una vez que hemos "enlazado" el fichero con un @array, podemos acceder a las líneas como elementos del array. Y en un array, si el último elemento es el -1, pues el penúltimo es el -2.

Estimado,

La opción del array no es aplicable para mi caso, ya que el archivo que tengo que procesar es un log, y necesito el penúltimo valor.

¿¿Es posible realizar esto con expresiones regulares??

Si el fichero lo tienes que tratar no de forma continuada (no a medida que crece, sino solo en determinados momentos), entonces sí que te vale. Haz la prueba y nos lo cuentas.

Y sí, podrías usar expresiones regulares, pero también tendrías que leer todo el fichero para localizar la penúltima línea.

En cambio, si debes vigilar el fichero log mientras crece, puedes usar File::Tail.

Máster, hice las pruebas y funcionó perfecto.

Muchas gracias.