#!/usr/bin/perl use strict; use lib '../domt'; use Continuity; use Rezmey; my $server = Continuity->new( port => 8080 ); $server->loop; sub main { my $r = shift; my $app = Rezmey->new($r); $app->main; }