1package TestApp::Action::TestBefore;
2
3use strict;
4use warnings;
5
6use base qw/Catalyst::Action/;
7
8sub execute {
9    my $self = shift;
10    my ( $controller, $c, $test ) = @_;
11    $c->res->header( 'X-TestAppActionTestBefore', $test );
12    $self->NEXT::execute( @_ );
13}
14
151;
16