¿Cómo puedo disparar y olvidar un proceso en Perl?

Question

¿Alguien puede decirme cómo olvidar y disparar un proceso en Perl? Ya he consultado ruby: how to fire and forget a subprocess? para hacer lo mismo en Ruby.

Answer 1

De respuesta perlfaq8 's a How do I start a process in the background?

---

Varios módulos pueden iniciar otros procesos que no bloquean su programa Perl . Puede utilizar IPC :: Open3, Parallel :: Jobs, IPC :: Run y ​​algunos de los módulos POE. Ver CPAN para más detalles.

También es posible usar

system("cmd &") 

o puede utilizar tenedor como se documenta en "tenedor" en perlfunc, con más ejemplos en perlipc. Algunas cosas a tener en cuenta, si estás en un Unix como sistema de :

stdin, stdout y stderr son compartidos

Tanto el proceso principal y la backgrounded (el "niño" proceso) comparten los mismos manejadores de archivo STDIN, STDOUT y STDERR. Si ambos intentan acceder a ellos de una vez, pueden suceder cosas extrañas. Usted puede querer cerrar o volver a abrir estos para el niño. Puede obtener alrededor de esto con "abrir" una tubería (ver "abrir" en perlfunc) pero en algunos sistemas significa que el proceso hijo no puede sobrevivir al padre .

señales

Vas a tener que coger la señal SIGCHLD, y posiblemente SIGPIPE también. SIGCHLD se envía cuando finaliza el proceso de fondo. SIGPIPE es enviado cuando escribe en un identificador de archivo cuyo proceso hijo ha cerrado (un SIGPIPE no capturado puede hacer que su programa muera en silencio). Esto no es un problema con "system (" cmd & ")".

Zombies

Usted tiene que estar preparado para "cosechar" el proceso hijo cuando acabados.

$SIG{CHLD} = sub { wait }; 

    $SIG{CHLD} = 'IGNORE'; 

También puede usar una horquilla doble. Inmediatamente esperas() para tu primer hijo , y el daemon init esperará() para tu nieto una vez que salga.

unless ($pid = fork) { 
     unless (fork) { 
      exec "what you really wanna do"; 
      die "exec failed!"; 
     } 
     exit 0; 
    } 
    waitpid($pid, 0); 

Ver "Señales" en perlipc para otros ejemplos de código para hacer esto. Los zombis no son un problema con "system (" prog & ")".

Answer 2

Si quiere demonizar su script Perl que había mirar en Proc::Daemon.

Answer 3

bien no se debe utilizar como system() entiendo esta llamada esperará a que el retorno de la función antes de continuar con la ejecución. Simplemente me limitaría a linux e iniciaría el proceso de esa manera, aunque tenga en cuenta que de esta manera se enviará una nueva copia del intérprete de comandos y, por lo tanto, si está buscando rendimiento, no lo haría en un ciclo:

process_name > /dev/null 2>&1 &;

que se iniciará el proceso de reorientación y STDOUTSTDERR-/dev/null.

Answer 4

Si desea que el proceso "secundario" del perro guardián desaparezca cuando finaliza el proceso "principal", no desea realmente que el proceso principal "active y olvide" el proceso hijo. O bien debe bifurcar (como lo describe el brian d foy) o pasar el PID del padre al hijo (para que este último pueda sondear la tabla de proceso, no recomendado).