#!/usr/local/bin/perl
# WARNING: this file is generated, do not edit
# generated on Fri Jan 18 11:24:32 2008
# 01: lib/Apache/TestConfig.pm:953
# 02: lib/Apache/TestConfig.pm:1043
# 03: lib/Apache/TestMM.pm:141
# 04: ./Makefile.PL:39

BEGIN { eval { require blib && blib->import; } }
#!perl -wT

use strict;

use CGI;
use CGI::Cookie;

my %cookies = CGI::Cookie->fetch;
my $name = 'ApacheTest';
my $c = ! exists $cookies{$name}
    ? CGI::Cookie->new(-name=>$name, -value=>time)
    : '';

print "Set-Cookie: $c\n" if $c;
print "Content-Type: text/plain\n\n";
print ($c ? 'new' : 'exists'), "\n";