文章详情

  • 游戏榜单
  • 软件榜单
关闭导航
热搜榜
热门下载
热门标签
php爱好者> php文档>perl的线程(2)

perl的线程(2)

时间:2011-04-27  来源:孤独的猫

#!/usr/bin/perl
#
use threads;

sub say_hello {
  printf("Hello thread! @_.\n");
  sleep(10);
  printf("Bye\n");
}

 sub quick_exit {
printf("I will be exit in no time\n");
exit(1);
}

my $t1 = threads->create( \&say_hello, "param1", "param2" );
my $t2 = threads->create( {'exit'=>'thread_only'}, \&quick_exit );

$t1->join();
$t2->join();

相关阅读 更多 +
排行榜 更多 +
太鼓达人plus

太鼓达人plus

音乐节奏 下载
吉品甄选

吉品甄选

购物比价 下载
恋与练习生2

恋与练习生2

音乐节奏 下载