'/test')
->code_isnt(500)
->content_is("OK")
->content_isnt("FAIL")
->header_is("X-Before-Dispatch", "MyApp")
->header_is("X-Test", "MyApp")
->header_isnt("X-Framework", "Perl
tApp';
isnt refaddr $app1->routes, refaddr $app2->routes, 'not the same app routes ok';
unlike $app1->routes->base, qr/^Kelp::Anonymous::/, 'base ok';
$app1->routes->add('/', 'hello');
isnt
sca
>header_isnt("X-Test2", "OK")
->header_is("X-Framework", "Changed")
->header_is("Content-Length", 2);
$t->request(GET '/mw/2/3')
->header_is("X-TestBridge", "OK")
->header_isnt("X-Tes
app->add_route('/a' => sub { 1 });
$t->request_ok(GET '/a');
$t->request(GET '//a')->code_isnt(200);
}
# Cookies
{
my $cookie_val = 'kelper';
my $user_cookie_name = '???=';
my $us