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

   1 package TestApp::Controller::Action::Regexp;
   2
   3 use strict;
   4 use base 'TestApp::Controller::Action';
   5
   6 sub one : Action Regexp('^action/regexp/(\w+)/(\d+)$') {
   7     my ( $self, $c ) = @_;
   8     $c->forward('TestApp::View::Dump::Request');
   9 }
  10
  11 sub two : Action Regex('^action/regexp/(\d+)/(\w+)$') {
  12     my ( $self, $c ) = @_;
  13     $c->forward('TestApp::View::Dump::Request');
  14 }
  15
  16 1;