The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
Mojo-0.991241
River stage zero No dependents
++
/ Mojolicious::Lite

NAME

Mojolicious::Lite - Micro Web Framework

SYNOPSIS

    # Using Mojolicious::Lite will enable "strict" and "warnings"
    use Mojolicious::Lite;

    # GET /*/bar (self contained without a template)
    get '/:foo/bar' => sub {
        my $self = shift;
        $self->render(text => 'Yea baby!');
    };

    # Shagadelic will start the Mojolicious script system
    shagadelic;

    # You can use all the normal script options from the command line
    % ./myapp.pl daemon
    Server available at http://127.0.0.1:3000.
    % ./myapp.pl daemon 8080
    Server available at http://127.0.0.1:8080.
    % ./myapp.pl mojo daemon_prefork
    Server available at http://127.0.0.1:3000.
    % ./myapp.pl mojo cgi
    ...CGI output...
    % ./myapp.pl mojo fastcgi
    ...Blocking FastCGI main loop...

    # The shagadelic call can be customized to override normal @ARGV use
    shagadelic(qw/mojo cgi/);

    # POST /foo/* (with name and matching template in the DATA section)
    post '/foo/:bar' => 'index';
    __DATA__
    @@ index.html.eplite
    % my $self = shift;
    Our :bar placeholder matched <%= $self->stash('bar') %>.
    We are <%= $self->url_for %>.

    # GET /with_layout (template and layout)
    get '/with_layout' => sub {
        my $self = shift;
        $self->render(template => 'with_layout', layout => 'green');
    };
    __DATA__
    @@ with_layout.html.eplite
    We've got content!
    @@ layouts/green.html.eplite
    <!html>
        <head><title>Green!</title></head>
        <body><%= $self->render_inner %></body>
    </html>

    # GET /bar (using url_for to generate url for "index" aka. "/foo/:bar")
    get '/bar' => sub {
        my $self = shift;
        $self->render(text => $self->url_for('index', bar => 'something'));
    };

    # /baz (nothing special, just allowing all methods)
    any '/baz' => sub {
        my $self = shift;
        $self->render(text => 'You called /baz with ' . $self->req->method);
    };

    # GET /hello/* (matching everything except "/" after "/hello/")
    get '/hello/(.you)' => sub {
        shift->render(template => 'groovy');
    };
    __DATA__
    @@ groovy.html.eplite
    Your name is <%= shift->stash('you') %>.

    # GET /hello/* (matching absolutely everything after "/hello/" including
    # "/" and ".")
    get '/hello/(*you)' => sub {
        shift->render(template => 'groovy');
    };
    __DATA__
    @@ groovy.html.eplite
    Your name is <%= shift->stash('you') %>.

    # /:something (with special regex constraint only matching digits)
    any '/:something' => [something => qr/\d+/] => sub {
        my $self = shift;
        $self->render(text => 'Something: ' . $self->stash('something'));
    };

    # GET /hello/* (with default value and template)
    get '/hello/:name' => {name => 'Sebastian'} => sub {
        my $self = shift;
        $self->render(template => 'groovy', format => 'txt');
    };
    __DATA__
    @@ groovy.txt.eplite
    % my $self = shift;
    My name is <%= $self->stash('name') %>.

    # GET|POST /bye (allowing GET and POST)
    any [qw/get post/] => '/bye' => sub {
        my $self = shift;
        $self->render(text => 'Bye!');
    };

    # GET /everything/*?name=* (using a lot of features together)
    get '/everything/:stuff' => [stuff => qr/\d+/] => {stuff => 23} => sub {
        shift->render(template => 'welcome');
    };
    __DATA__
    @@ welcome.html.eplite
    % my $self = shift;
    Stuff is <%= $self->stash('stuff') %>.
    Query param name is <%= $self->req->param('name') %>.

    # GET /detection.html (format detection with multiple templates)
    # GET /detection.txt
    get '/detection' => sub {
        my $self = shift;
        $self->render(template => 'detected');
    };
    __DATA__
    @@ detected.html.eplite
    <!html>
        <head><title>Detected!</title></head>
        <body>HTML was detected.</body>
    </html>
    @@ detected.txt.eplite
    TXT was detected.

    # /external (render external template "templates/foo/bar.html.epl")
    any '/external' => sub {
        my $self = shift;
        $self->render(template => 'foo/bar.html.epl');
    };

    # /something.js (serving external static files, yes it's that simple)
    % mkdir public
    % mv something.js public/something.js

    # To disable debug messages later in a production setup you can change
    # the Mojolicious mode (the default mode will be development)
    % MOJO_MODE=production ./myapp.pl

    # Log messages will be automatically written to a "log/$mode.log" file if
    # a log directory exists
    % mkdir log

    # For more control you can also access the Mojolicious instance directly
    app->log->level('error');
    app->routes->route('/foo/:bar')->via('get')->to(callback => sub {
        my $self = shift;
        $self->render(text => 'Hello Mojo!');
    });

    # In case your lite apps need to grow, you can easily mix lite and real
    # Mojolicious apps for a smooth transition process
    package MyApp::Foo;
    use base 'Mojolicious::Controller';
    sub index {
        shift->render(text => 'It works!');
    }
    package main;
    use Mojolicious::Lite;
    get '/bar' => sub {
        shift->render(text => 'This too!');
    };
    app->routes->namespace('MyApp');
    app->routes->route('/foo/:action')->via('get')
      ->to(controller => 'foo', action => index);
    shagadelic;

DESCRIPTION

Mojolicous::Lite is a micro web framework built upon Mojolicious and Mojo. For userfriendly documentation see Mojo::Manual::Mojolicious.

ATTRIBUTES

Mojolicious::Lite inherits all attributes from Mojolicious.

METHODS

Mojolicious::Lite inherits all methods from Mojolicious and implements the following new ones.

new

    my $mojo = Mojolicious::Lite->new;