#!/usr/bin/env perl use HTTP::Engine; use HTTP::Engine::Middleware; main(); sub main { my $engine = setup_engine(); $engine->run(); } sub setup_engine { return HTTP::Engine->new( interface => { module => 'ServerSimple', args => { p…