たけまる / Catalyst Internals - Controller

_ Catalyst Internals - Controller [perl][catalyst] ■ Controller の作り方 ここでは，単に Controller を実装するのではなく，サブクラス化される ことを前提として Controller を実装します． 親クラスで実装し，個別の処理をサブクラスで実装します．いまから示す 例では，親クラスで実際の処理を実装し，サブクラスではアクションの定 義のみを行います． 以下，親クラス名を Catalyst::Controller::Super とし，サブクラスを MyApp::Controller::Sub とします． package Catalyst::Controller::Super; use base qw( Catalyst::Controller ); sub do_foo { my ( $self, $c ) = @_