Запуск фонового процесса без ожидания в Perl

Первый предназначен для работы таким образом - system выполняет команду и доводит ее до конца.

Последние два также разработаны таким образом - exec специально разработан, чтобы никогда не возвращаться. Он в основном заменяет родительский процесс дочерним процессом.

Однако второй должен сделать свое дело: команда, запущенная из вызова system, является оболочкой, которой дается ваша строка для выполнения. Поскольку строка заканчивается на «&», это означает, что оболочка запустит вашу команду как фоновый процесс и завершит собственное выполнение после этого запуска.

Не могли бы вы опубликовать больше кода, иллюстрирующего, как # 2 не работает?

Также посмотрите, что произойдет, если вы попробуете обратные кавычки или qx:

my $output = qx|perl /util/script.pl $id &|;
print $output;

Кроме того, как способ сокращения неизвестных, не могли бы вы запустить следующее и сказать мне, что печатает:

my $output = qx|(echo "AAAAAAA"; /bin/date; sleep 5; /bin/date; echo "BBBBBBB") &|;
print $output;

Вы звоните fork() перед звонком system или exec?

my $pid = fork();
if (defined($pid) && $pid==0) {
    # background process
    my $exit_code = system( $command );
    exit $exit_code >> 8;
}


my $pid = fork();
if (defined($pid) && $pid==0) {
    # background process
    exec( $command );
    # doesn't^H^H^H^H^H^H shouldn't return
}

Вам нужно отделить ребенка от родителя. См. демон perldoc -q. Или Proc::Daemon

Использование fork — хороший способ фоновых процессов:

my $pid = fork;
die "fork failed" unless defined $pid;
if ($pid == 0) {
    # child process goes here
    do '/util/script.pl';
    exit;
}
# parent process continues here