Back in the early days of the web there was this wonderful Perl library called CGI, many people only learned Perl because of it. It was simple enough to get started without knowing much about the language and powerful enough to keep you going, learning by doing was much fun. While most of the techniques used are outdated now, the idea behind it is not. Mojolicious is a new attempt at implementing this idea using state of the art technology.
An amazing MVC web framework supporting a simplified single file mode through Mojolicious::Lite.
Powerful out of the box with RESTful routes, plugins, Perl-ish templates, session management, signed cookies, testing framework, static file server, I18N, first class unicode support and much more for you to discover.
Very clean, portable and Object Oriented pure Perl API without any hidden magic and no requirements besides Perl 5.8.7.
Full stack HTTP 1.1 and WebSocket client/server implementation with TLS, Bonjour, IDNA, Comet (long polling), chunking and multipart support.
Builtin async IO web server supporting epoll, kqueue, UNIX domain sockets and hot deployment, perfect for embedding.
Automatic CGI, FastCGI and PSGI detection.
JSON and XML/HTML5 parser with CSS3 selector support.
Fresh code based upon years of experience developing Catalyst.
Web development for humans, making hard things possible and everything fun.
use Mojolicious::Lite;
# Simple route with plain text response
get '/hello' => sub { shift->render(text => 'Hello World!') };
# Route to template in DATA section
get '/time' => 'clock';
# RESTful web service sending JSON responses
get '/:offset' => sub {
my $self = shift;
my $offset = $self->param('offset') || 23;
$self->render(json => {list => [0 .. $offset]});
};
# Scrape information from remote sites
post '/title' => sub {
my $self = shift;
my $url = $self->param('url') || 'http://mojolicio.us';
$self->render(text =>
$self->client->get($url)->res->dom->at('head > title')->text);
};
# WebSocket echo service
websocket '/echo' => sub {
my $self = shift;
$self->on_message(
sub {
my ($self, $message) = @_;
$self->send_message("echo: $message");
}
);
};
app->start;
__DATA__
@@ clock.html.ep
% my ($second, $minute, $hour) = (localtime(time))[0, 1, 2];
<%= link_to clock => begin %>
The time is <%= $hour %>:<%= $minute %>:<%= $second %>.
<% end %>
Single file prototypes like this one can easily grow into well structured applications.
Loosely coupled building blocks, use what you like and just ignore the rest.
.---------------------------------------------------------------.
| |
| .----------------------------------------------'
| | .--------------------------------------------.
| Application | | Mojolicious::Lite |
| | '--------------------------------------------'
| | .--------------------------------------------.
| | | Mojolicious |
'----------------' '--------------------------------------------'
.---------------------------------------------------------------.
| Mojo |
'---------------------------------------------------------------'
.-------. .-----------. .--------. .------------. .-------------.
| CGI | | FastCGI | | PSGI | | HTTP 1.1 | | WebSocket |
'-------' '-----------' '--------' '------------' '-------------'
All you need is a oneliner.
curl -L cpanmin.us | perl - http://latest.mojolicio.us