3 use Test::Requires qw(Plack::Server::AnyEvent);
5 use Plack::Middleware::Session;
6 use HTTP::Request::Common;
8 $Plack::Test::Impl = 'Server';
9 $ENV{PLACK_SERVER} = 'AnyEvent';
14 my $w = $respond->([ 200, [ 'Content-Type' => 'text/html' ] ]);
20 $app = Plack::Middleware::Session->wrap($app);
25 my $res = $cb->(GET "/");
26 is $res->content, "Hello";
27 like $res->header('Set-Cookie'), qr/plack_session/;