t/lib/TestApp/Controller/Dump.pm

   1 package TestApp::Controller::Dump;
   2
   3 use strict;
   4 use base 'Catalyst::Base';
   5
   6 sub default : Action Private {
   7     my ( $self, $c ) = @_;
   8     $c->forward('TestApp::View::Dump');
   9 }
  10
  11 sub env : Action Relative {
  12     my ( $self, $c ) = @_;
  13     $c->stash( env => \%ENV );
  14     $c->forward('TestApp::View::Dump');
  15 }
  16
  17 sub parameters : Action Relative {
  18     my ( $self, $c ) = @_;
  19     $c->forward('TestApp::View::Dump::Parameters');
  20 }
  21
  22 sub request : Action Relative {
  23     my ( $self, $c ) = @_;
  24     $c->forward('TestApp::View::Dump::Request');
  25 }
  26
  27 sub response : Action Relative {
  28     my ( $self, $c ) = @_;
  29     $c->forward('TestApp::View::Dump::Response');
  30 }
  31
  32 1;