Perl Coro的用法

概述今天研究了下，记录下来。 #!/usr/bin/perl use Coro; use AnyEvent::HTTP; my @coro; foreach my $i (1..1000){ push @coro, async{ http_get 'http://www.baidu.com', cb => Coro::rouse_cb; print "开始并发$i...\n"; my @re

今天研究了下，记录下来。

#!/usr/bin/perl    use Coro; use AnyEvent::http; my @coro; foreach my $i (1..1000){ push @coro, async{ http_get 'http://www.baIDu.com',cb => Coro::rouse_cb; print "开始并发$i...\n"; my @res = Coro::rouse_wait; print "$i返回结果$res[1]->{Status}\n"; }; cede; } $_->join foreach @coro;

总结

以上是内存溢出为你收集整理的Perl Coro的用法全部内容，希望文章能够帮你解决Perl Coro的用法所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。