9 eval { require Catalyst::Plugin::Session::State::Cookie; Catalyst::Plugin::Session::State::Cookie->VERSION(0.03) }
11 "Catalyst::Plugin::Session::State::Cookie 0.03 or higher is required for this test";
14 require Test::WWW::Mechanize::Catalyst;
15 Test::WWW::Mechanize::Catalyst->VERSION(0.51);
18 'Test::WWW::Mechanize::Catalyst >= 0.51 is required for this test';
24 use Test::WWW::Mechanize::Catalyst "SessionTestApp";
26 my $injected_cookie = "sessiontestapp_session=89c3a019866af6f5a305e10189fbb23df3f4772c";
28 my $ua1 = Test::WWW::Mechanize::Catalyst->new;
29 $ua1->add_header('Cookie' => $injected_cookie);
31 my $res = $ua1->get( "http://localhost/login" );
32 my $cookie = $res->header('Set-Cookie');
35 isnt $cookie, qr/$injected_cookie/, 'Logging in generates us a new cookie';