||
用到的模块
use threads;
use threads::shared; ## 涉及到一些进程间变量的共享,用这个模块
用到的几个函数为:
threads->new(&fun, @para); #创建一个线程
$thr->join() ;#返回线程运行后的结果
下面是一个简单的例子,该脚本能够使用4个线程,而且时间上确实快了3倍。
参考自:
http://perldoc.perl.org/threads.html
http://www.cnblogs.com/joechen/archive/2009/04/27/1444569.html
Archiver|手机版|科学网 ( 京ICP备07017567号-12 )
GMT+8, 2024-11-24 10:11
Powered by ScienceNet.cn
Copyright © 2007- 中国科学报社