t/lib/TestApp/Controller/DynamicFinal/Bar.pm

   1 use CatalystX::Declare;
   2
   3 controller TestApp::Controller::DynamicFinal::Bar {
   4
   5     with 'TestApp::ControllerRole::DynamicFinal' => {
   6         is_final    => 0,
   7         base        => 'base',
   8         body        => 'bar',
   9         counters    => [qw( y z )],
  10     };
  11
  12     action base as df_bar under '/';
  13
  14     final action wrapped under msg {
  15         $ctx->response->body(sprintf 'wrapped[%s]', $ctx->response->body);
  16     }
  17 }
  18