Foro - Perl en Español

Hola.

Estoy intentando generar un script el cual realice en cascada una copia de un archivo cuando éste llegue a un tamaño definido.

Primeramente el script monitorea un equipo, si el equipo monitoreado se encuentra operando, éste envía una respuesta, la cual es almacenada en un archivo con la extensión log (realizado previamente por el script) todas las respuestas se guardan en este archivo, para no saturar el espacio del equipo donde se tiene guardado el archivo es necesario definir el tamaño del archivo.

Una vez que el archivo llegue a este tamaño, el script deberá realizar una copia del archivo agregando un 0 al nombre del archivo original para poder diferenciarlos. Posteriormente el script deberá eliminar la información del archivo original para guardar las nuevas respuestas que le lleguen.

Actualmente el script genera solo un copia del archivo base.

Ejemplo de los archivos generados:

MONITOREO_192.168.1.159.log archivo base
MONITOREO_192.168.1.159.log0 copia de archivo base

Me gustaría que el script generara 5 archivos más, de tal forma que la información más actual quedara en forma ascendente; que cuando se llene el archivo base éste genere una copia y la pase al siguiente archivo; posteriormente, el siguiente archivo (.log0) realice una copia y la pase al siguiente archivo (.log1) y así sucesivamente con los restantes archivos hasta llegar al log5. ¿¿¿ Alguna idea que me puedas dar para realizar este proceso ???


MONITOREO_192.168.1.159.log archivo base
MONITOREO_192.168.1.159.log0
MONITOREO_192.168.1.159.log1
MONITOREO_192.168.1.159.log2
MONITOREO_192.168.1.159.log3
MONITOREO_192.168.1.159.log4
MONITOREO_192.168.1.159.log5

Cualquier comentario sería de gran ayuda.