3年前の大混乱
モダンPerl界を代表するウェブアプリケーションフレームワークといわれるCatalystが2006年半ばに5.
このようなディストリビューション名の変更は,
ただ,
なにしろ集団管理体制に移行した最大の理由は,
Catamooseへの移行は待ったなし
それからそろそろ3年がたち,
開発版は2008年10月から公開されていましたから,
連載第2回でも紹介したように,
今回の移行はまだ始まったばかりですから戦略の正否を評価できる段階にはありませんが,
今回は筆者が実際に遭遇した問題を中心に,
継承ツリーの操作にはご用心
伝統的に,
package MyApp;
use strict;
use warnings;
use Catalyst::Runtime '5.70';
use Catalyst qw/-Debug ConfigLoader Static::Simple/;
our $VERSION = '0.01';
__PACKAGE__->config( name => 'MyApp' );;
__PACKAGE__->setup;
1;
このMyAppは,
package MyApp;
use strict;
use warnings;
use Catalyst::Runtime '5.70';
use parent qw/Catalyst/;
our $VERSION = '0.01';
__PACKAGE__->config( name => 'MyApp' );;
__PACKAGE__->setup(qw/-Debug ConfigLoader Static::Simple/);
1;
Catalyst 5.
ところが,
package MyApp;
use strict;
use warnings;
use Catalyst::Runtime '5.70';
use Catalyst qw/-Debug ConfigLoader Static::Simple/;
use parent 'Catalyst'; # または push @ISA, 'Catalyst';
our $VERSION = '0.01';
__PACKAGE__->config( name => 'MyApp' );;
__PACKAGE__->setup;
1;
おもしろいことに,
この場合は古いやり方にしたがってuse parentの行を削除するか,