The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Terse::Controller - models made simple.

VERSION

Version 0.23

SYNOPSIS

        package My::App::Model::Data;

        use base 'Terse::Model';

        sub do_something {
                ...
        }

        1;

        ... If using Terse::App 

        package My::App::Controller::Overview;

        use base 'Terse::Controller';

        sub overview :get {
                $_[1]->response->data = $_[1]->model('data')->do_something();
        }

        ... else 

        package MyApp;

        use base 'Terse::Controller';
        
        use MyAppModel;

        sub build_controller {
                $_[0]->models->data = MyAppModel->new();
        }

        sub overview :get {
                $_[1]->response->data = $_[1]->model('data')->do_something();
        }

AUTHOR

LNATION, <email at lnation.org>

LICENSE AND COPYRIGHT

Terse.