Amon2::Web::Dispatcher::RouterBoom - Router::Boom bindings
package MyApp2::Web::Dispatcher; use Amon2::Web::Dispatcher::RouterBoom; base 'MyApp::Web::C'; get '/' => 'Foo#bar'; 1;
This is a router class for Amon2. It's based on Router::Boom.
get($path:Str, $destnation:Str)
post($path:Str, $destnation:Str)
any($path:Str, $destnation:Str)
get '/' => 'Root#index'; get '/:user' => 'User#show'; any '/:user/update' => 'User#update'; post '/:user/blog/post' => 'Blog#post';
Add routes by DSL. First argument is the path pattern in Path::Boom rules. Second argument is the destination method path.
Destination method pass is ${class}#${method} form.
${class}#${method}
The path declared with get() accepts GET and HEAD. The path declared with post() accepts POST method. The path declared with any() accepts any methods.
base($klass:Str)
base 'My::App::Web::C';
You can specify the base class name for 'Root#index' style definition.
If you are write your dispatcher in following code, then the method for '/' is My::App::Web::C::Root->index.
My::App::Web::C::Root->index
base 'My::App::Web::C'; get '/' => 'Root#index';
get($path:Str, $destnation:CodeRef)
post($path:Str, $destnation:CodeRef)
any($path:Str, $destnation:CodeRef)
get '/' => sub { my ($c) = @_; ... }; get '/:user' => sub { my ($c, $args) = @_; $c->render( 'user.tx' => { user => $args->{user}, }, ); };
Add routes by DSL. First argument is the path pattern in Path::Boom rules. Second argument is the destination code.
Callback function's first argument is the context object. Second is the captured values from the router.
Router::Boom's routing rule is really flexible. You can embed regexp in your rule.
/foo/bar
String literal matches strings.
/:foo
:foo matches qr{[^/]}. It's captured.
:foo
qr{[^/]}
/{foo}
{foo} is same as :foo.
{foo}
/{foo:.*}
You can use the custom regexp for capturing.
/*
* is same as {*:.*}.
*
{*:.*}
You can customize the exception handler. You can define the special named method 'handle_exception'.
package MyApp::Web::Dispatcher; sub handle_exception { my ($class, $c, $e) = @_; if (UNIVERSAL::isa($e, 'My::Exception::Validation')) { return $self->create_simple_status_page(400, 'Bad Request'); } else { return $c->res_500(); } }
Amon2
To install Amon2, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Amon2
CPAN shell
perl -MCPAN -e shell install Amon2
For more information on module installation, please visit the detailed CPAN module installation guide.