微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

如何在Perl中运行脚本而不是等待它?

我在Perl中有一个系统调用,如下所示:
system('/path/to/utility >> /redirect/to/log file');

但这等待实用工具完成.我只是想触发它,让Perl脚本完成,无论实用程序调用是否完成.

我怎样才能做到这一点?

我尝试将线路更改为

system('/path/to/utility >> /redirect/to/log file &');

但是这种语法仍然等待在Windows上完成调用.我需要让它在Linux和Windows上运行.

解决方法

if ($^O eq 'MSWin32') {
   system('start "" \\path\\to\\utility >> \\redirect\\to\\log_file');
} else {
   system('/path/to/utility >> /redirect/to/log_file &');
}

要么

if ($^O eq 'MSWin32') {
   system(1,'\\path\\to\\utility >> \\redirect\\to\\log_file');
} else {
   system('/path/to/utility >> /redirect/to/log_file &');
}

原文地址:https://www.jb51.cc/Perl/171749.html

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐