Perl   发布时间:2022-04-04  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了如何使用Perl的系统调用来生成独立线程?大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
我想调用其他Perl脚本,以便使用主Perl脚本执行争用测试.

这样的东西目前有效:

system("perl 1.pl");
system("perl 2.pl");
exit;

但是,我想把它们作为独立的线程同时运行.

我根据我的Google搜索尝试过这样的事情:

system(1,"perl 1.pl");
system(1,"perl 2.pl");
exit;

这不起作用.主脚本立即存在,这很好,但我想要生成的底层线程不会被启动.我想知道是否还有其他事情要做,或者是否有其他人做过这样的事情.

在此先感谢您的帮助.

解决方法

use threads;
$thr1 = threads->create('msc','perl 1.pl');
$thr2 = threads->create('msc','perl 2.pl');

$thr1->join();
$thr2->join();

sub msc{ ## make system call
  system( @_ );
}

这将等待它们退出之前完成执行.我猜这是你想要的原始问题,对吗?如果没有随意删除评论并编辑您的帖子以更好地解释它,我会再试一次.

大佬总结

以上是大佬教程为你收集整理的如何使用Perl的系统调用来生成独立线程?全部内容,希望文章能够帮你解决如何使用Perl的系统调用来生成独立线程?所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。
标签: