| Current Path : /proc/self/root/proc/self/root/proc/self/root/usr/share/doc/perl-Mojolicious/examples/ |
| Current File : //proc/self/root/proc/self/root/proc/self/root/usr/share/doc/perl-Mojolicious/examples/fast.pl |
#
# Fast "Hello World" application for profiling the HTTP stack
#
use Mojo::Base 'Mojolicious';
sub handler {
my $tx = pop;
$tx->res->code(200)->body('Hello World!');
$tx->resume;
}
__PACKAGE__->new->start;