>    However, here's what 'lynx -mime-header -source [URL]' gives me:
> 
>       Content-Type: text/plain
> 
>    I can use an AddType directive to force .pl files to be sent as
>    text/html, but then I lose my Expires: headers and any others that
>    I may have set.

OK, here I go following up on my own message again.  In another thread
you refered to setting $r->content_type() as a possible solution.  The
mod_perl O'Reilly book that I'm using goes into some detail about it
too, but I couldn't figure out where $r came from (hey, I've only used
mod_perl for a few days now ;)

Anyhow, this Web page was a big help:

   http://www.webreference.com/programming/perl/mod_perl/chap6/4/4.html

Basically, adding these lines to my perl script made it all better:

   my $r = Apache->request;
   $r->content_type('text/html');
   $r->no_cache(1);

The only other question that I'm left with now is why I get these lines
in my error log regularly:

   Subroutine Apache::send_http_header redefined at 
/usr/local/perl/lib/site_perl/5.8.0/Apache/RegistryFilter.pm line 48, <GEN0> line 1.
   Subroutine Apache::send_cgi_header redefined at 
/usr/local/perl/lib/site_perl/5.8.0/Apache/RegistryFilter.pm line 49, <GEN0> line 1.

I added 

   no warnings 'redefine';

to the top of RegistryFilter.pm for now (which solved that problem), but is
there a better way to handle this?

Thanks,

Chris

-- 
Reporting bugs: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html

Reply via email to