Foro - Perl en Español

Buenos días.

Estimados, de nuevo molestando. Tengo un script que me hace varias revisiones en una máquina Linux, pero hay un comando en especial que al enviarlo se queda colgado y para salir de ese comando hay que hacer Ctrl+C desde el teclado.

El tema es que necesito enviar este Ctrl+C de una vez desde el script Perl para evitar que tenga que ser el usuario que lo haga sino más bien lo haga el script.

Si sirve de algo, el comando que envío es hastatus y el resultado es el siguiente:


Luego de mostrar esto, para volver al prompt "maquina1:/home/xxx/scripts #" es necesario hacer un Ctrl+C.

Como dato adicional, queda como corriendo como un proceso:


De antemano agradezco su ayuda.

¿Has probado a ejecutar el comando hastatus con la opción -summary?

hastatus -summary

A lo mejor así sale inmediatamente.

Hola, explorer, gracias por tu pronta respuesta. Te comento que ese comando también me sirve. Sin embargo el comando hastatus trae mucha más información que al enviarle -summary, es por esa razón que necesito enviarlo solo como hastatus.

Quedo a la espera de tus valiosos comentarios.

Bueno, para enviarle un Ctrl+C, en realidad lo que queremos hacer es enviarle la señal INT (interruption) al proceso hastatus.

Entonces, hay que averiguar el pid de ese proceso, y luego, desde nuestro programa, hacer un

kill INT, $pid;

Gracias, explorer, veré si enviando la señal INT me funciona.