On Thursday 28 January 2010 16:27:29 m...@normalperson.e4ward.com wrote:
> How to set the filter for some output headers?
> I want to add some Expire: and Cache-Control: headers to make
> downstream cacheserver to cache the pages.
> Though they are dynamic pages, but I think they are safe to be cachable.
>
PerlOutputFilter "sub { \
use strict; \
use Apache2::Filter (); \
use Apache2::RequestRec (); \
use Apache2::Const -compile=>qw/DECLINED/; \
my ($f)=...@_; \
@{$f->r->headers_out}{qw/Expire Cache-Control/}= \
(q{...}, q{...}); \
$f->remove; \
return Apache2::Const::DECLINED; \
}"
Fill in the 2 ellipses.
Torsten
