t/lib/TestApp/Controller/Action.pm

   1 package TestApp::Controller::Action;
   2
   3 use strict;
   4 use base 'Catalyst::Base';
   5
   6 sub begin : Private {
   7     my ( $self, $c ) = @_;
   8     $c->res->header( 'X-Test-Class'  => ref($self) );
   9     $c->response->content_type('text/plain; charset=utf-8');
  10 }
  11
  12 sub default : Private {
  13     my ( $self, $c ) = @_;
  14     $c->res->output("Error - TestApp::Controller::Action\n");
  15 }
  16
  17 1;