PerlのCPANモジュールObject::ContainerにみるSingletonパターン | hirobanex.net『PerlのCPANモジュールに学ぶオブジェクトデザインパターン』第二弾としてObject::ContainerからSingletonパターンを読み取ります。 問題:毎回同じインスタンスを生成している 前回の『PerlのCPANモジュールQudoにみるTemplateMethodパターン』で紹介したQudoのようなモジュールのインスタンスを生成するときには、以下のような長いコンストラクションコードを書いてジョブの登録とかを行います。 my $client = Qudo->new( driver_class => 'Skinny', # DBIx::Skinny databases => [ +{ dsn => 'dbi:SQLite:/tmp/qudo.db', username => '', password => '', } ], ); # enqueue job $client->e
