Mojolicious::Lite

Sebastian Riedel не перестает удивлять, в прошлую субботу он анонсировал Mojolicious::Lite. Это реально круто, такого я в перле еще не видел, действительно «быстрый старт»:

ставим модуль:

cpan Mojolicious::Lite

создаём скрипт:

!/usr/bin/perl

use strict;
use warnings;

use Mojolicious::Lite;

get '/' => sub {
    my $self = shift;
    $self->render(text => 'It works!');
};

shagadelic;

запускаем:

perl ./mojolitetest.pl daemon

все, открываем в браузере http://localhost:3000/ и наслаждаемся )

но это еще не все что я хотел показать, еще конечно можно использовать шаблоны и прямо в этом же скрипте:

!/usr/bin/perl

use strict;
use warnings;

use Mojolicious::Lite;

get '/' => sub {
    my $self = shift;
    $self->render(text => 'It works!');
};
get '/foo' => sub {
    my $self = shift;
    $self->render(template => 'foo');
};

shagadelic;

__DATA__
@@ foo.html.eplite
It's from template!

запускаем скрипт и по адресу http://localhost:3000/foo видим:
«It's from template!»

больше информации на странице модуля