package MyApp::Dispatch;
use base 'CGI::Application::Dispatch';
sub translate_module_name {
my $self = shift;
return 'MyApp::Module::Name';
}
sub get_runmode {
return 'rm2';
}
1;
package MyApp::Dispatch;
use base 'CGI::Application::Dispatch';
sub translate_module_name {
my $self = shift;
return 'MyApp::Module::Name';
}
sub get_runmode {
return 'rm2';
}
1;