Perl多線程如何實(shí)現(xiàn)

這篇文章主要介紹了Perl多線程如何實(shí)現(xiàn)，具有一定借鑒價(jià)值，感興趣的朋友可以參考下，希望大家閱讀完這篇文章之后大有收獲，下面讓小編帶著大家一起了解一下。

Perl語(yǔ)言的Perl多線程

Perl多線程的實(shí)現(xiàn)一般有兩種辦法，而老版本的辦法實(shí)際上是一種多進(jìn)程的辦法。

一、Thread->New

該辦法是傳統(tǒng)的老辦法，它與folk很類似，新建一個(gè)進(jìn)程時(shí)，會(huì)把當(dāng)前內(nèi)存空間的所有變量都復(fù)制一份傳到新的進(jìn)程里面。已實(shí)現(xiàn)共享數(shù)據(jù)。而隨著技術(shù)的發(fā)展，本文不針對(duì)該方法做深入研究。

二、IThread

這種方法是通過(guò)新建一個(gè)新的perlinterpreter。默認(rèn)情況下，所有的數(shù)據(jù)和變量是不被線程共享的。如果想共享一個(gè)變量，需通過(guò)threads::shared來(lái)實(shí)現(xiàn)。在使用此方法的時(shí)候，需要注意以下三點(diǎn)：

◆變量默認(rèn)是不在線程中共享的。
◆通過(guò)"usethreads"引用命名空間，不能通過(guò)eval，do，或者require。
◆如果有變量需要共享，必須引用"threads::shared"。并在定義變量的時(shí)候如下：
my$var1:shared="value";

以下是一個(gè)簡(jiǎn)單的使用Perl多線程的例子。

很多時(shí)候使用Perl多線程可以達(dá)到很不錯(cuò)的效果，可以節(jié)約很多時(shí)間完成很復(fù)雜的工作。但通過(guò)perlthreads模塊的描述文件可以看到，它也有很多缺點(diǎn)。比如說(shuō)在使用Perl多線程的時(shí)候，必須的保證所有引用的模塊都是支持thread。而在實(shí)際應(yīng)用中，我們很難做到這樣。比如我們要Perl多線程，但同時(shí)要應(yīng)用OLE模塊去操作activex。此用例應(yīng)該是一種很常見(jiàn)的用例。那是不是意味著此時(shí)我們不得不放棄使用Perl多線程呢。非也，本文介紹一種可以使用Perl多線程和ole的例子。

在http://www.cpan.org/官方網(wǎng)站上對(duì)這種情況給出的方案是：

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

再次，主要討論一下第二種情況，既主要是該非thread模塊放到方法中引用。

感謝你能夠認(rèn)真閱讀完這篇文章，希望小編分享的“Perl多線程如何實(shí)現(xiàn)”這篇文章對(duì)大家有幫助，同時(shí)也希望大家多多支持億速云，關(guān)注億速云行業(yè)資訊頻道，更多相關(guān)知識(shí)等著你來(lái)學(xué)習(xí)!