use Mojolicious::Lite;
 
app->config(
    hypnotoad => {
        listen => [ 'http://127.0.0.1:8082/' ],
        proxy  => 1,
    },
);
 
# the rest of your application goes here

##</code><code>##

LoadModule proxy_module lib/httpd/mod_proxy.so
LoadModule proxy_http_module lib/httpd/mod_proxy_http.so

<Proxy *>
   Order allow,deny
   Allow from all
 </Proxy>

<VirtualHost *:80>

    ServerName app1.somehost.com
    ProxyPass / http://localhost:3000/
    ProxyPassReverse / http://localhost:3000/

</VirtualHost>

<VirtualHost *:80>

    ServerName app2.somehost.com
    ProxyPass / http://localhost:3001/
    ProxyPassReverse / http://localhost:3001/

</VirtualHost>

##</code><code>##

#!/usr/bin/perl -wT
use strict;
use CGI;

my $query = CGI->new();

print $query->header( "text/html" ),
  $query->start_html(-title   => "My First CGI Script",
                     -bgcolor => "#ffffcc" ),
  $query->h1( "This is a pretty lame web page" ),
  $query->p( "Who is this Ovid guy, anyway?" ),
  $query->end_html