FAQ PerlConsultez toutes les FAQ

Un processus est un appel au système pour exécuter un programme. Dans ce chapitre, nous allons envisager trois façons d'exécuter des processus. Dans un premier temps, intéressons-nous à la fonction system.
L'appel de cette fonction demande à Perl de lancer un processus enfant pour exécuter le programme appelé par system. Une fois que ce programme se termine, le processus enfant s'achève et rend la main au processus père à savoir votre programme :

system "ls";

1
2
my $commande = 'ls'; 
system($commande) == 0 or die "Erreur de la commande : $commande\n";

La fonction exec est semblable à system. Mais, sa différence avec la fonction précédente réside dans le fait que le processus père se termine en même temps que le processus fils.

1
2
exec ("ls"); 
print "Et maintenant, qu'allons-nous faire ?";

Utiliser les backquotes (ou apostrophes inversées pour les francophones) vous permettra de récupérer une sortie pour vos programmes. Par exemple :

1
2
$sortie = `ls`; 
print $sortie;

Amis du C, réjouissez-vous ! Votre fonction pour les threads favoris, à savoir fork, est aussi présente dans Perl. Pour les non-initiés, à quoi sert la fonction fork ?

Cette fonction permet de créer un processus enfant et de mettre le processus parent (votre programme Perl) en veille en attendant la fin de ce processus enfant. Elle duplique (clone) un processus en créeant une copie conforme de lui même :

1
2
3
4
5
6
7
defined($pid = fork) or die "Pas de fork possible : $!"; 
unless($pid) { 
print "Processus fils.\n"; 
exec "ls"; 
} 
waitpid($pid, 0); 
print "Retour au père.";

Un signal système est un signal envoyé à un processus. Par exemple, sous Unix, citons :