#!/usr/bin/perl use strict; use Continuity; use Willy; Continuity->new->loop; sub main { my $request = shift; my $app = Willy->new(req => $request); $app->run; }