<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<META NAME="Generator" CONTENT="MS Exchange Server version 5.5.2653.12">
<TITLE>RE: [Gllug] Perl question, but it is a linux server!</TITLE>
</HEAD>
<BODY>
<BR>
<P><FONT SIZE=2>On Thu, 27 Mar 2003, Adrian McMenamin wrote:</FONT>
</P>
<P><FONT SIZE=2>> I would like to put 'no cache' in the headers for a page generated by perl</FONT>
<BR><FONT SIZE=2>> and I am not using the CGI module.</FONT>
<BR><FONT SIZE=2>> </FONT>
<BR><FONT SIZE=2>> Googling has produced lots of evil :-> python code, but none in lovely perl.</FONT>
</P>
<P><FONT SIZE=2>It's not actually a "No Cache" option you want for the headers but rather </FONT>
<BR><FONT SIZE=2>an Expires one. See below for an example set of headers...</FONT>
</P>
<P><FONT SIZE=2>HTTP/1.1 200 OK</FONT>
<BR><FONT SIZE=2>Date: Thu, 27 Mar 2003 17:27:02 GMT</FONT>
<BR><FONT SIZE=2>Server: Crazy Perl Script that doesn't use CGI</FONT>
<BR><FONT SIZE=2>Expires: Wed, 26 Mar 2003 17:27:03 GMT</FONT>
<BR><FONT SIZE=2>Connection: close</FONT>
<BR><FONT SIZE=2>Content-Type: text/html; charset=ISO-8859-1</FONT>
</P>
<P><FONT SIZE=2>Hey! When the CGI module properly supports CSS I'll use it!</FONT>
</P>
</BODY>
</HTML>