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

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

    open my $io, '<file';

    return ['200', ['Content-Length' => 5], $io];
};