% cat > app.cgi
package main;

my $app = sub {
      return [ 200, [ "Content-Type", "text/html" ], [ "Hello" ] ];
};
Plack::Handler::CGI->new->run($app);

% cat `perldoc -l Plack::Handler::CGI` app.cgi > app_bundled.cgi

##</code><code>##

$ cat > myapp.pl
    use Mojolicious::Lite;
    get '/' => sub {
      my $self = shift;
      $self->render(text => "Hi");
    };
    app->start;