1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75
|
package TestApp::Controller::Priorities;
use strict;
use base 'Catalyst::Controller';
#
# Regex vs. Local
#
sub re_vs_loc_re :Regex('/priorities/re_vs_loc') { $_[1]->res->body( 'regex' ) }
sub re_vs_loc :Local { $_[1]->res->body( 'local' ) }
#
# Regex vs. LocalRegex
#
sub re_vs_locre_locre :LocalRegex('re_vs_(locre)') { $_[1]->res->body( 'local_regex' ) }
sub re_vs_locre_re :Regex('/priorities/re_vs_locre') { $_[1]->res->body( 'regex' ) }
#
# Regex vs. Path
#
sub re_vs_path_path :Path('/priorities/re_vs_path') { $_[1]->res->body( 'path' ) }
sub re_vs_path_re :Regex('/priorities/re_vs_path') { $_[1]->res->body( 'regex' ) }
#
# Local vs. LocalRegex
#
sub loc_vs_locre_locre :LocalRegex('loc_vs_locre') { $_[1]->res->body( 'local_regex' ) }
sub loc_vs_locre :Local { $_[1]->res->body( 'local' ) }
#
# Local vs. Path (depends on definition order)
#
sub loc_vs_path1_loc :Path('/priorities/loc_vs_path1') { $_[1]->res->body( 'path' ) }
sub loc_vs_path1 :Local { $_[1]->res->body( 'local' ) }
sub loc_vs_path2 :Local { $_[1]->res->body( 'local' ) }
sub loc_vs_path2_loc :Path('/priorities/loc_vs_path2') { $_[1]->res->body( 'path' ) }
#
# Path vs. LocalRegex
#
sub path_vs_locre_locre :LocalRegex('path_vs_(locre)') { $_[1]->res->body( 'local_regex' ) }
sub path_vs_locre_path :Path('/priorities/path_vs_locre') { $_[1]->res->body( 'path' ) }
#
# Regex vs. index (has sub controller)
#
sub re_vs_idx :Regex('/priorities/re_vs_index') { $_[1]->res->body( 'regex' ) }
#
# Local vs. index (has sub controller)
#
sub loc_vs_index :Local { $_[1]->res->body( 'local' ) }
#
# LocalRegex vs. index (has sub controller)
#
sub locre_vs_idx :LocalRegex('locre_vs_index') { $_[1]->res->body( 'local_regex' ) }
#
# Path vs. index (has sub controller)
#
sub path_vs_idx :Path('/priorities/path_vs_index') { $_[1]->res->body( 'path' ) }
1;
|