前回に引き続きMooseでAdapterパターンを書いてみました。 教科書は結城さんのデザパタ本。 コード Print.pm package Print; use Moose::Role; requires qw( printWeak printStrong ); no Moose::Role; 1; Banner.pm package Banner; use Moose; use Perl6::Say; has 'string' => ( is => 'rw', isa => 'Str' ); no Moose; sub BUILDARGS { my ($self, $string) = @_; return { string => $string }; } sub showWithParen { my $self = shift; say '(' . $self->string . '
3年前の大混乱 モダンPerl界を代表するウェブアプリケーションフレームワークといわれるCatalystが2006年半ばに5.6系統から5.7系統に移行したとき、創始者のゼバスティアン・リーデル氏を追い出す形で集団管理体制に移行した開発チームが最初にしたことは、プロジェクト開始当初から使われてきたCatalystという名のディストリビューションはそのままに、Catalyst-Runtimeという新しいディストリビューションをつくることでした。 このようなディストリビューション名の変更は、CPANクライアントを使っている分には(内部でモジュール名からディストリビューション名への変換が行われるので)問題にならないのですが、外部のパッケージ管理者たちには少なからぬ負担をかけました。なにしろ突然100を越す関連パッケージの依存が変更になるのです。基本的にはメタ情報だけ書き換えれば済む話とはいえ、従
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く