e2c3fa63
1 2 3 4 5 6 7
my $app = sub { my ($environ) = @_; $len = $environ->{'psgi.input'}->read(my $body, 1024); return ['200', ['Content-Length' => $len], [$body]]; };