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); }
$server->on(request => sub { my ($server, $tx) = @_; ... });
Emitted when a request is ready and needs to be handled.
$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; });
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.
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;
my $app = $server->load_app('/home/sri/myapp.pl');
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.