Mojo::Server - HTTP/WebSocket server base class
package Mojo::Server::MyServer;
use Mojo::Base 'Mojo::Server', -signatures;
sub run ($self) {
# Get a transaction
my $tx = $self->build_tx;
# Emit "request" event
$self->emit(request => $tx);
}
Mojo::Server is an abstract base class for HTTP/WebSocket servers and server interfaces, like Mojo::Server::CGI, Mojo::Server::Daemon, Mojo::Server::Hypnotoad, Mojo::Server::Morbo, Mojo::Server::Prefork and Mojo::Server::PSGI.
Mojo::Server inherits all events from Mojo::EventEmitter and can emit the following new ones.
$server->on(request => sub ($server, $tx) {...});
Emitted when a request is ready and needs to be handled.
$server->on(request => sub ($server, $tx) {
$tx->res->code(200);
$tx->res->headers->content_type('text/plain');
$tx->res->body('Hello World!');
$tx->resume;
});
Mojo::Server implements the following attributes.
my $app = $server->app;
$server = $server->app(MojoSubclass->new);
Application this server handles, defaults to a Mojo::HelloWorld object.
my $bool = $server->reverse_proxy;
$server = $server->reverse_proxy($bool);
This server operates behind a reverse proxy, defaults to the value of the MOJO_REVERSE_PROXY
environment variable or true if "trusted_proxies" is not empty.
my $proxies = $server->trusted_proxies;
$server = $server->trusted_proxies(['10.0.0.0/8', '127.0.0.1', '172.16.0.0/12', '192.168.0.0/16', 'fc00::/7']);
This server expects requests from trusted reverse proxies, defaults to the value of the MOJO_TRUSTED_PROXIES
environment variable split on commas with optional whitespace. These proxies should be addresses or networks in CIDR form.
Mojo::Server inherits all methods from Mojo::EventEmitter and implements the following new ones.
my $app = $server->build_app('MyApp');
my $app = $server->build_app('MyApp', log => Mojo::Log->new);
my $app = $server->build_app('MyApp', {log => Mojo::Log->new});
Build application from class and assign it to "app".
my $tx = $server->build_tx;
Let application build a transaction.
$server->daemonize;
Daemonize server process.
my $app = $server->load_app('/home/sri/myapp.pl');
my $app = $server->load_app('/home/sri/myapp.pl', log => Mojo::Log->new);
my $app = $server->load_app('/home/sri/myapp.pl', {log => Mojo::Log->new});
Load application from script and assign it to "app".
say Mojo::Server->new->load_app('./myapp.pl')->home;
my $server = Mojo::Server->new;
my $server = Mojo::Server->new(reverse_proxy => 1);
my $server = Mojo::Server->new({reverse_proxy => 1});
Construct a new Mojo::Server object and subscribe to "request" event with default request handling.
$server->run;
Run server. Meant to be overloaded in a subclass.