1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
#!/opt/perl use Mojolicious::Lite; get '/' => sub { my $c = shift; $c->render(template => 'index'); }; @ARGV = ("prefork", "-l", "http://*:8080") unless @ARGV; app->start; __DATA__ @@ index.html.ep Howdy
You can clone a snippet to your computer for local editing. Learn more.