Files
nginx-unit/test/perl/streaming_body_multiple_responses/psgi.pl

12 lines
264 B
Perl

my $counter = 2;
my $app = sub {
my $env = shift;
return sub {
my $responder = shift;
$responder->([200, ['Content-Type'=>'text/plain'], [$counter++]]);
$responder->([200, ['Content-Type'=>'text/plain'], [$counter++]]);
};
};