NAME
Mojo::Server - HTTP server base class
SYNOPSIS
package Mojo::Server::MyServer;
use Mojo::Base 'Mojo::Server';
sub run {
my $self = shift;
# Get a transaction
my $tx = $self->build_tx;
# Emit "request" event
$self->emit(request => $tx);
}DESCRIPTION
Mojo::Server is an abstract HTTP server base class.
EVENTS
Mojo::Server inherits all events from Mojo::EventEmitter and can emit the following new ones.
request
$server->on(request => sub {
my ($server, $tx) = @_;
...
});Emitted when a request is ready and needs to be handled.
$server->unsubscribe('request');
$server->on(request => sub {
my ($server, $tx) = @_;
$tx->res->code(200);
$tx->res->headers->content_type('text/plain');
$tx->res->body('Hello World!');
$tx->resume;
});ATTRIBUTES
Mojo::Server implements the following attributes.
app
my $app = $server->app;
$server = $server->app(MojoSubclass->new);Application this server handles, defaults to a Mojo::HelloWorld object.
METHODS
Mojo::Server inherits all methods from Mojo::EventEmitter and implements the following new ones.
new
my $server = Mojo::Server->new;Construct a new Mojo::Server object and subscribe to "request" event with default request handling.
build_app
my $app = $server->build_app('Mojo::HelloWorld');Build application from class.
build_tx
my $tx = $server->build_tx;Let application build a transaction.
load_app
my $app = $server->load_app('/home/sri/myapp.pl');Load application from script.
say Mojo::Server->new->load_app('./myapp.pl')->home;run
$server->run;Run server. Meant to be overloaded in a subclass.