[perl] Zabijanie wątku

0

Witam.
Mam taki przykładowy skrypt:

#!/usr/bin/perl

$pid = fork();
if(!$pid){
  system("program_nie_konczacy_sie");
}
sleep 2;
exit 1;

Problem jest taki, gdy skrypt zakończy pracę, wątek dalej jest wykonywany. Potrzebuję zrobić tak, aby wraz z końcem skryptu zakończył się proces wykonywania programu. W tym przypadku po zakończeniu skryptu, w procesach mam program_nie_konczacy_sie. Myślałem nad dodaniem do skryptu killall i żeby zabijał program_... lecz skrypt może byc wykonany kilka razy.

0

Może chodzi o procesy zombie?

1 użytkowników online, w tym zalogowanych: 0, gości: 1