#!C:\perl\bin\perl.exe
print <<EEK;
Status: 302 Moved
Set-Cookie: id=something; path=/; expires=Fri, 29-Dec-2000 21:59:38 GMT
Date: Fri, 22 Dec 2000 21:59:38 GMT
Location: productCategory.cgi

EEK