I am running an apache server 2.2.3 on CentOS 5.2. I have turned on the proxy with the following lines from my apache.conf: <IfModule mod_proxy.c> ProxyRequests On <Proxy *> Order deny,allow Deny from all Allow from all </Proxy> </IfModule> I would like to add a header field to all requests going through the proxy. After doing a bunch of reading it seemed that setting up a PerlInputFilterHandler was the right thing to do. I added the following lines to the apache.conf PerlModule company::AddHeader PerlInputFilterHandler company::AddHeader and I wrote the following example handler package company::AddHeader; use strict; use warnings; use Apache2::Filter (); use Apache2::RequestRec (); use APR::Table (); use Apache2::Const -compile => qw(OK DECLINED); my $debug = 1; sub handler { my $f = shift; # if we have already seen this do nothing return Apache2::Const::DECLINED if $f->ctx; # get headers my $headers_in = $f->r->headers_in(); # add header field $headers_in->set("Message","Hi Mom"); $f->r->headers_in($headers_in); if($debug) { open FILE, ">>/tmp/out.log" or die $!; foreach my $key (keys %{$headers_in}) { print FILE "$key = $headers_in->{$key}\n"; } close FILE; } $f->ctx(1); return Apache2::Const::OK; } 1;
As you can see, if debugging is turned on the headers are written to the file /tmp/out.log. The contents of out.log contains the new header, but the requests being forwarded by the proxy don't seem to be altered. Why is the new header not being sent? I am pretty sure I am missing something very simple, but have spent a day trying to figure out what it is. Any ideas? cheers, Brandon