如何知道Win32 :: Job启动的进程状态

时间:2014-05-21 15:34:30

标签: perl process

我有以下内容以启动超时

的进程
use Win32::Job;
my $job = Win32::Job->new;

# Run $command for $max_time
$job->spawn($Config{"C:/Windows/System32/cmd.exe"}, $command, new_group);
$job->run($max_time);
$job_stat=$job->status;
print LOG "$command status $job_stat\n";   

我阅读了Win32::Job CPAN指南并添加了最后两行,因为我想知道该过程是完成还是超时。这是正确的方法吗?

1 个答案:

答案 0 :(得分:3)

根据the documentationstatus方法返回包含两个键的哈希:exitcodetime。因此,如果你想要退出代码,你应该像这样使用它

my $job_stat = $job->status;
print "Exit code ", $job_stat->{exitcode}, "\n";

如果您想要工作所用的时间,您可以使用

中的任何一个或全部
$job_stat->{time}{user}
$job_stat->{time}{kernel}
$job_stat->{time}{elapsed}