http://d.hatena.ne.jp/foosin/20090416/1239903771 ~~ snip ~~ __END__ === 1st --- i --- e [] YAML Error: Expected separator '---' Code: YAML_PARSE_ERR_NO_SEPARATOR Line: 1 Document: 2 at /usr/lib/perl5/site_perl/5.8.5/YAML.pm line 33 # Looks…

こちらを参考に。 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,…

C::C::Component::Plaggerizeをつかったアプリで、__PACKAGE__->load_pluginsしたプラグインのinitから$context->confが使えなくてdieしたので、初期化シーケンスを調べてみた。 ほんとはこんなに単純ではないんだけどね。 newが呼ばれると、NEXTでさかのぼ…

my $hoge = {}; # 1 my @arr = @{ $hoge->{foo} }; # 2 @{ $hoge->{foo} } = qw/aa bb/; 1は死ぬけど、2は大丈夫なのな。