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 $ua = Test::WWW::Mechanize::Catalyst->new;
28 $ua->get_ok("http://localhost/accessor_test", "Set session vars okay");
30 $ua->content_contains("two: 2", "k/v list setter works okay");
32 $ua->content_contains("four: 4", "hashref setter works okay");
34 $ua->content_contains("five: 5", "direct access works okay");