Tengo un bloque de código ...

$ cmd \u003d "$ audit_dir encontrar-mtime + $ days_to_keep-exec rm () \ \;"

a menos que (abierto (CMD, "$ cmd |")){
$ msg \u003d "Error de comando: $ cmd \ n \ n";
LGH print_log $ ", $ msg", 1;
exit 1;
)

$ print_log LGH, "Eliminar archivos físicos con Command: $ cmd", 1 si verbose;

while ($ linea \u003d <CMD>) (
$ print_log LGH, "los archivos físicos de más de $ days_to_keep eliminado de audit_dir $", $ 1 si verbose;
)


después de que ejecuta la print_log, no va dentro del bucle while ..

lo que me estoy perdiendo aquí?

Gracias

a su vez sobre las advertencias y vuelva a ejecutar el código:

use warnings;

podría ayudar a señalar algunos problemas en el código

Si el encontrar comando no se imprime nada, obviamente no se obtiene ninguna información sobre la <CMD> tirador. (¿Por qué desea imprimir el mensaje de registro una vez por la línea de salida si hay muchas líneas de producción, de todos modos?)

Supongo que está intentando salir de la condición divina de la encontrar el mando, el cerrar debería decirles que, o simplemente utilizar sistema en lugar de abrir