NAME
Mojo - The Box!
SYNOPSIS
use base 'Mojo';
# All the complexities of CGI, FastCGI, PSGI, HTTP and WebSockets get
# reduced to a single method call!
sub handler {
my ($self, $tx) = @_;
# Request
my $method = $tx->req->method;
my $path = $tx->req->url->path;
# Response
$tx->res->code(200);
$tx->res->headers->content_type('text/plain');
$tx->res->body("$method request for $path!");
$tx->resume;
}
DESCRIPTION
Mojo provides a flexible runtime environment for Perl web frameworks. It provides all the basic tools and helpers needed to write simple web applications and higher level web frameworks such as Mojolicious.
See Mojolicious for more!
ATTRIBUTES
Mojo implements the following attributes.
client
my $client = $app->client;
$app = $app->client(Mojo::Client->new);
A full featured HTTP 1.1 client for use in your applications, by default a Mojo::Client object.
home
my $home = $app->home;
$app = $app->home(Mojo::Home->new);
The home directory of your application, by default a Mojo::Home object which stringifies to the actual path.
log
my $log = $app->log;
$app = $app->log(Mojo::Log->new);
The logging layer of your application, by default a Mojo::Log object.
on_build_tx
my $cb = $app->on_build_tx;
$app = $app->on_build_tx(sub { ... });
The transaction builder callback, by default it builds a Mojo::Transaction::HTTP object.
on_websocket_handshake
my $cb = $app->on_websocket_handshake;
$app = $app->on_websocket_handshake(sub { ... });
The websocket handshake callback, by default it builds a Mojo::Transaction::WebSocket object and handles the response for the handshake request.
METHODS
Mojo inherits all methods from Mojo::Base and implements the following new ones.
new
my $app = Mojo->new;
Construct a new Mojo application. Will automatically detect your home directory and set up logging to log/mojo.log
if there's a log directory.
handler
$tx = $app->handler($tx);
The handler is the main entry point to your application or framework and will be called for each new transaction, usually a Mojo::Transaction::HTTP or Mojo::Transaction::WebSocket object.
sub handler {
my ($self, $tx) = @_;
}