HEX
Server: Apache
System: Windows NT MAGNETO-ARM 10.0 build 22000 (Windows 10) AMD64
User: Michel (0)
PHP: 7.4.7
Disabled: NONE
Upload Files
File: C:/mod_perl-2.0.12/Apache-Test/t/cookies.t
# this test tests how a cookie jar can be passed (needs lwp)

use strict;
use warnings FATAL => 'all';

use Apache::Test;
use Apache::TestRequest;
use Apache::TestUtil;

plan tests => 2, need [qw(CGI CGI::Cookie)],
                      need_cgi, need_lwp, need need_module('mod_alias.c');

Apache::TestRequest::user_agent( cookie_jar => {} );

my $url = '/cgi-bin/cookies.pl';

ok t_cmp GET_BODY($url), 'new', "new cookie";
ok t_cmp GET_BODY($url), 'exists', "existing cookie";