Catalyst Maintainable web apps made easy! #29

Root.pm

package DoQueue::Controller::Root;

use strict;
use warnings;
use base 'Catalyst::Controller';

__PACKAGE__->config->{namespace} = '';
sub default : Private {
    my ( $self, $c ) = @_;

    # Hello World
    $c->response->body( $c->welcome_message );
}
sub end : ActionClass('RenderView') {}
Copyright © 2007 Jonathan Rockway