Perl多线程如何实现

这篇文章主要介绍了Perl多线程如何实现，具有一定借鉴价值，感兴趣的朋友可以参考下，希望大家阅读完这篇文章之后大有收获，下面让小编带着大家一起了解一下。

Perl语言的Perl多线程

Perl多线程的实现一般有两种办法，而老版本的办法实际上是一种多进程的办法。

一、Thread->New

该办法是传统的老办法，它与folk很类似，新建一个进程时，会把当前内存空间的所有变量都复制一份传到新的进程里面。已实现共享数据。而随着技术的发展，本文不针对该方法做深入研究。

二、IThread

这种方法是通过新建一个新的perlinterpreter。默认情况下，所有的数据和变量是不被线程共享的。如果想共享一个变量，需通过threads::shared来实现。在使用此方法的时候，需要注意以下三点：

◆变量默认是不在线程中共享的。
◆通过"usethreads"引用命名空间，不能通过eval，do，或者require。
◆如果有变量需要共享，必须引用"threads::shared"。并在定义变量的时候如下：
my$var1:shared="value";

以下是一个简单的使用Perl多线程的例子。

很多时候使用Perl多线程可以达到很不错的效果，可以节约很多时间完成很复杂的工作。但通过perlthreads模块的描述文件可以看到，它也有很多缺点。比如说在使用Perl多线程的时候，必须的保证所有引用的模块都是支持thread。而在实际应用中，我们很难做到这样。比如我们要Perl多线程，但同时要应用OLE模块去操作activex。此用例应该是一种很常见的用例。那是不是意味着此时我们不得不放弃使用Perl多线程呢。非也，本文介绍一种可以使用Perl多线程和ole的例子。

在http://www.cpan.org/官方网站上对这种情况给出的方案是：

Ifthemodulewillonlybeusedinsideathread,  youcantryloadingthemodulefrominsidethethreadentrypointfunctionusingrequire(andimportifneeded):  subthr_func{requireUnsafe::Module#Unsafe::Module->import(...);  ....}Ifthemoduleisneededinsidethemainthread,  trymodifyingyourapplicationsothatthemoduleisloaded(againusingrequireand->import())afteranythreadsarestarted,  andinsuchawaythatnootherthreadsarestartedafterwards。

再次，主要讨论一下第二种情况，既主要是该非thread模块放到方法中引用。

感谢你能够认真阅读完这篇文章，希望小编分享的“Perl多线程如何实现”这篇文章对大家有帮助，同时也希望大家多多支持亿速云，关注亿速云行业资讯频道，更多相关知识等着你来学习!