アプリケーションの枠組みを越えた再利用
前回は,
もちろんそのコードが小さく,
今回はそのような例のひとつとして,
Reactionは,
Reactionはかなり大きなコードなので全貌を把握するのは大変ですが,
環境を構築する
ReactionはCPANに上がっていますので,
ただし,
tarballの解凍が済んだら,
> perl script/componentui_server.pl
- ※1
残念ながら最新版はいまのところ依存モジュールの都合でWindows環境では正しくインストールできません。
また,
過去に初期のバージョンをインストールしたことがある方は, 内部構造が大きく変わっているので一度古いReactionを削除する必要があるかもしれません。ReactionやReactionが利用しているファイルがどこにインストールされているかは, シェルから下記のコマンドを実行すれば調べられます。 > perldoc -l Reaction > perl -MFile::ShareDir=dist_
dir -e 'print dist_ dir "Reaction"'
ルートコントローラをのぞいてみよう
動作を確認したところで,
まずは,
sub base :Chained('/') :PathPart('') :CaptureArgs(0) {
my ($self, $c) = @_;
$self->push_viewport(SiteLayout,
title => 'ComponentUI test title',
static_base_uri => "${\$c->uri_for('/static')}",
meta_info => {
http_header => {
'Content-Type' => 'text/html;charset=utf-8',
},
},
);
}
sub root :Chained('base') :PathPart('') :Args(0) {
my ($self, $c) = @_;
$self->push_viewport(ViewPort, layout => 'index');
}
push_
use aliased 'Reaction::UI::ViewPort';
use aliased 'Reaction::UI::ViewPort::SiteLayout';
また,