package Module::Name;
use base 'CGI::Application';

sub setup {
    my $self = shift;
    $self->start_mode('rm1');
    $self->run_modes(
        rm1 => 'rm1',
    ); 
}

sub rm1 {
    my $self = shift;
    return 'Module::Name->rm1';
}

1;