gistfile1.perl

use Jifty;
my $app;
sub {
    my $env = shift;
    unless ($app) {
        Jifty->new;
        $app = Jifty->handler->psgi_app;
    }
    $app->($env);
}