path: root/test/perl/server_port/psgi.pl

my $app = sub {
    my ($environ) = @_;

    return ['200', [
        'Content-Length' => 0,
        'Server-Port' => $environ->{'SERVER_PORT'}
    ], []];
};