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

    return ['200', [], []];
};