t/lib/TestApp/Controller/Action/Path.pm

   1 package TestApp::Controller::Action::Path;
   2
   3 use strict;
   4 use base 'TestApp::Controller::Action';
   5
   6 __PACKAGE__->config(
   7     actions => {
   8       'one' => { 'Path' => [ 'a path with spaces' ] },
   9       'two' => { 'Path' => "åäö" },
  10     },
  11 );
  12
  13 sub one : Action Path("this_will_be_overriden") {
  14     my ( $self, $c ) = @_;
  15     $c->forward('TestApp::View::Dump::Request');
  16 }
  17
  18 sub two : Action {
  19     my ( $self, $c ) = @_;
  20     $c->forward('TestApp::View::Dump::Request');
  21 }
  22
  23 sub three :Path {
  24     my ( $self, $c ) = @_;
  25     $c->forward('TestApp::View::Dump::Request');
  26 }
  27
  28 sub four : Path( 'spaces_near_parens_singleq' ) {
  29     my ( $self, $c ) = @_;
  30     $c->forward('TestApp::View::Dump::Request');
  31 }
  32
  33 sub five : Path( "spaces_near_parens_doubleq" ) {
  34     my ( $self, $c ) = @_;
  35     $c->forward('TestApp::View::Dump::Request');
  36 }
  37
  38 1;