NAME CGI::Dispatcher::Simple - Simple CGI Dispacher by PATH_INFO SYNOPSIS # In your App package MyApp; use base qw/CGI::Dispacher::Simple/; sub run { my $self = shift; $self->dispatch({ '/' => 'default', '/list' => 'list', '/add' => 'add', }); } sub default { : } : # And in your CGI script my $app = MyApp->new; $app->run; DESCRIPTION This module provide you to simple dispatcher by using PATH_INFO. You can set some methods as hashref, PATH_INFO are keys, METHODS are values. like: '/' => 'default', '/list/add' => 'add', And, rest of PATH_INFO is saved in $self->args as arrayref. When PATH_INFO is '/list/add/foo/bar' in above example, $self->args is: [ 'foo', 'bar' ] If you define $self->begin or $self->end methods, these are called automatically before/after PATH_INFO method. And when PATH_INFO is not defined, dispatch to '/' method. METHODS new dispatch AUTHOR Daisuke Murase COPYRIGHT This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module.