dump.psgi

use strict;
use Plack::Builder;
use Data::Dumper;

my $app = sub {
    [404, [], ['Not Found']];
};

my $psgi = builder {
    enable "Debug";
    enable "Static", path => qr{^/impress/}, root => './';
    $app;
};

builder {
    sub {
        my $env = shift;
        my $res = $psgi->($env);

        warn Dumper($res);

        $res;
    };
};