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

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