Funzione fork di Perl

Descrizione

Questa funzione esegue il fork di un nuovo processo utilizzando la chiamata di sistema fork (). Eventuali socket o filehandle condivisi vengono duplicati tra i processi. Devi assicurarti di aspettare i tuoi figli per impedire la formazione di processi "zombi".

Sintassi

Di seguito è riportata la semplice sintassi per questa funzione:

fork

Valore di ritorno

Questa funzione restituisce undef in caso di errore di fork e ID processo figlio al genitore in caso di successo 0 al figlio in caso di successo.

Esempio

Di seguito è riportato il codice di esempio che mostra il suo utilizzo di base:

#!/usr/bin/perl

$pid = fork();
if( $pid == 0 ) {
   print "This is child process\n";
   print "Child process is existing\n";
   exit 0;
}
print "This is parent process and child ID is $pid\n";
print "Parent process is existing\n";
exit 0;

Quando viene eseguito il codice sopra, produce il seguente risultato:

This is parent process and child ID is 18641
Parent process is existing
This is child process
Child process is existing