2009-04-09から1日間の記事一覧
こちらを参考に。 use strict; use warnings; use Gearman::Worker; use Parallel::Prefork; use Storable qw( thaw ); use List::Util qw( sum ); use Perl6::Say; sub MaxRequestsPerChild () { 60 } my $pm = Parallel::Prefork->new({ max_workers => 3,…