Apache::PassHtml - print out the html file

Apache-OutputChain documentation Contained in the Apache-OutputChain distribution.

Index

Code Index:

NAME

Top

Apache::PassHtml - print out the html file

SYNOPSIS

Top

In the conf/access.conf file of your Apache installation add lines

	<Files *.html>
	SetHandler perl-script
	PerlHandler Apache::OutputChain Apache::MakeCapital Apache::PassHtml
	</Files>

DESCRIPTION

Top

This is simple script to show the use of module Apache::OutputChain. It will pick up a html file and send it to the output, STDOUT. We assume that the output is tied either to Apache (by default), or some user-defined perl handler. We need to read and write to STDOUT in perl since Apache will not pass its output into perl handlers.

AUTHOR

Top

(c) 1997--1998 Jan Pazdziora

Apache-OutputChain documentation Contained in the Apache-OutputChain distribution. 
package Apache::PassHtml;
use strict;
use Apache::Constants ':common';
sub handler
	{
	my $r = shift;
	my $filename = $r->filename();
	return DECLINED unless $filename =~ /\.html$/;

	if (-f $filename and -r $filename and open FILE, $filename)
		{
		$r->status(200);
		$r->send_http_header;
		local ($_);
		while (<FILE>)
			{ print $_; }
		close FILE;
		return OK;
		}
	return DECLINED;
	}
1;