Как я могу получить идентификатор процесса команды UNIX, которую я запускаю в сценарии Perl?
Я запускаю команду UNIX в сценарии Perl.
Мне нужен идентификатор процесса команды UNIX.
Например, если я запускаю ниже команды UNIX:
# padv -s adv.cfg > adv.out &
[1] 4550
Мой идентификатор процесса 4550.
# ps -ef | grep padv
root 4550 2810 0 16:28 pts/5 00:00:00 padv -s adv.cfg
root 4639 2810 0 16:29 pts/5 00:00:00 grep padv
Как захватить этот идентификатор процесса в моем Perl Script?
Например, я запускаю свою команду в скрипте Perl, как показано ниже:
#!/usr/bin/perl
use strict;
use warnings;
qx(padv -s adv.cfg > adv.out &);