package MyApp::View::TT; use strict; use base 'Catalyst::View::TT'; sub new { my $class = shift; my ( $c, $arguments ) = @_; $arguments->{FILTERS} = { do_something => ?&MyApp::View::TT::do_something, }; $class->config( $arguments ); return…

C::P::FillInForm は、C::P::FormValidator が組み込まれており、かつ、エラーが存在する時に、自動でパラメータを Fill in してくれる。 個人的には、C::P::FormValidator::Simple が好みなので、C::P::FillInForm の finalize を、少しだけ書き換えた。つ…