还可以在导入threads模块时设置:
1 use threads (‘exit‘ => ‘thread_only‘);
3.Perl 多线程:Threads(exit thread_only)
原文：http://www.cnblogs.com/perl6/p/6120031.html
