1package TestApp::Controller::Action::Auto; 2 3use strict; 4use base 'TestApp::Controller::Action'; 5 6sub auto : Private { 7 my ( $self, $c ) = @_; 8 return 1; 9} 10 11sub default : Private { 12 my ( $self, $c ) = @_; 13 $c->res->body( 'default' ); 14} 15 16sub one : Local { 17 my ( $self, $c ) = @_; 18 $c->res->body( 'one' ); 19} 20 211; 22