<div>请教一下我这个线程有关闭掉吗？不太理解perl的多线程</div>
<div>我这样的话,join能够关闭线程吗？</div>
<div>&nbsp;</div>
<div>
<p>while(1)<br>{<br>&nbsp;&nbsp;&nbsp; $MySocket-&gt;recv($text,128);<br>&nbsp;&nbsp;&nbsp; if($text =~ &#39;username&#39;)<br>&nbsp;&nbsp;&nbsp; {<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; $tempcount = 0;<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; @threads[$tempcount]=threads-&gt;new(\&amp;start_thread,$MySocket);<br>&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; &nbsp;$tempcount++;<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; print &quot;\nReceived message &#39;&quot;, $text,&quot;&#39;\n&quot;;<br>&nbsp;&nbsp;&nbsp; }<br>}</p>
<p>&nbsp;foreach my $thread (@threads) {<br>&nbsp;print &quot;end\n&quot;;<br>&nbsp;$thread-&gt;join();<br>}</p></div>
<div>sub start_thread{</div>
<div>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 执行程序;</div>
<div>}</div>
<div><br><br>&nbsp;</div>
<div><span class="gmail_quote">在08-3-23，<b class="gmail_sendername">bruce cheng</b> &lt;<a href="mailto:bruce1914@gmail.com">bruce1914@gmail.com</a>&gt; 写道：</span>
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">发邮件列表自己是收不到的。<br><br>不知道能不能改进下。<br><br>&gt; -----邮件原件-----<br>&gt; 发件人: china-pm-bounces+bruce1914=<a href="mailto:gmail.com@pm.org">gmail.com@pm.org</a><br>
&gt; [mailto:<a href="mailto:china-pm-bounces+bruce1914=gmail.com@pm.org">china-pm-bounces+bruce1914=gmail.com@pm.org</a>] 代表 purl lamp<br>&gt; 发送时间: 2008年3月23日 18:16<br>&gt; 收件人: <a href="mailto:china-pm@pm.org">china-pm@pm.org</a><br>
&gt; 主题: Re: [PerlChina] 我怎么发不了邮件到mail list<br>&gt;<br>&gt; you have made it :D<br>&gt;<br>&gt; 在 08-3-23，gary.jsz&lt;<a href="mailto:gary.jsz@gmail.com">gary.jsz@gmail.com</a>&gt; 写道：<br>&gt; &gt;<br>&gt; &gt;<br>&gt; &gt; 奇怪，try again<br>
&gt; &gt;<br>&gt; &gt;&nbsp;&nbsp;________________________________<br>&gt; &gt;<br>&gt; &gt; 蒋士竹<br>&gt; &gt; _______________________________________________<br>&gt; &gt;&nbsp;&nbsp;China-pm mailing list<br>&gt; &gt;&nbsp;&nbsp;<a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>
&gt; &gt;&nbsp;&nbsp;<a href="http://mail.pm.org/mailman/listinfo/china-pm">http://mail.pm.org/mailman/listinfo/china-pm</a><br>&gt; &gt;<br>&gt; _______________________________________________<br>&gt; China-pm mailing list<br>&gt; <a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>
&gt; <a href="http://mail.pm.org/mailman/listinfo/china-pm">http://mail.pm.org/mailman/listinfo/china-pm</a><br><br>_______________________________________________<br>China-pm mailing list<br><a href="mailto:China-pm@pm.org">China-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/china-pm">http://mail.pm.org/mailman/listinfo/china-pm</a></blockquote></div><br><br clear="all"><br>-- <br>BR<br>Steven.zhu