<IfDefine HAVE_PERL>
    <IfModule !mod_perl.c>
	LoadModule perl_module	extramodules/mod_perl.so
    </IfModule>
</IfDefine>

<IfModule mod_perl.c>
    # Uncomment this line to globally enable warnings, which will be
    # written to the server's error log.  Warnings should be enabled
    # during the development process, but should be disabled on a
    # production server as they affect performance.
    #PerlSwitches -w

    # Uncomment this line to enable taint checking globally.  When Perl is
    # running in taint mode various checks are performed to reduce the
    # risk of insecure data being passed to a subshell or being used to
    # modify the filesystem.  Unfortunately many Perl modules are not
    # taint-safe, so you should exercise care before enabling it on a
    # production server.
    #PerlSwitches -T
</ifModule>

#
# Allow server status reports, with the URL of http://servername/perl-status
# Change the ".your_domain.com" to match your domain to enable.
#
<IfModule mod_perl.c>
	<Location /perl-status>
	    SetHandler modperl
	    PerlResponseHandler Apache2::Status

	    # StatusDumper:
	    # When browsing symbol tables, the values of arrays, hashes and 
	    # scalars can be viewed via Data::Dumper if this configuration 
	    # variable is set to On:
	    #PerlSetVar StatusDumper On

	    # StatusPeek:
	    # With this option On and the Apache::Peek module installed, 
	    # functions and variables can be viewed ala Devel::Peek style:
	    #PerlSetVar StatusPeek On

	    # StatusLexInfo:
	    # With this option On and the B::LexInfo module installed,
	    # subroutine lexical variable information can be viewed.
	    #PerlSetVar StatusLexInfo On

	    # StatusDeparse:
	    # With this option On subroutines can be "deparsed".
	    #PerlSetVar StatusDeparse On
    
	    # StatusTerse:
	    # With this option On, text-based op tree graphs of subroutines
	    # can be displayed, thanks to B::Terse.
	    #PerlSetVar StatusTerse On

	    # StatusTerseSize:
	    # With this option On and the B::TerseSize module installed,
	    # text-based op tree graphs of subroutines and their size can be
    	    # displayed. See the B::TerseSize docs for more info.
	    #PerlSetVar StatusTerseSize On

	    # StatusTerseSizeMainSummary:
	    # With this option On and the B::TerseSize module installed, a 
	    # "Memory Usage" will be added to the Apache::Status main menu. 
	    # This option is disabled by default, as it can be rather cpu 
	    # intensive to summarize memory usage for the entire server. It is
	    # strongly suggested that this option only be used with a
	    # development server running in -X mode, as the results will be
	    # cached.
	    #PerlSetVar StatusTerseSizeMainSummary On

	    # StatusGraph:
	    # When StatusDumper is enabled, another link "OP Tree Graph" will
	    # be present with the dump if this configuration variable is set
	    # to On:
	    #PerlSetVar StatusGraph

	    # Dot:
	    # Location of the dot program for StatusGraph, if other than
	    # /usr/bin or /usr/local/bin
	    #Dot /usr/bin

	    # GraphDir:
	    # Directory where StatusGraph should write it's temporary image
	    # files. Default is $ServerRoot/logs/b_graphs.
	    #GraphDir logs/b_graphs

	    Order deny,allow
	    Deny from all
	    Allow from 127.0.0.1
	    ErrorDocument 403 "Access denied per /etc/httpd/modules.d/75_mod_perl.conf"

	</Location>

</ifModule>

<IfModule mod_perl.c>
    # Provide two aliases to the same cgi-bin directory,
    # to see the effects of the 2 different mod_perl modes
    # for Apache::Registry Mode
    Alias /perl/ /var/www/perl/

    # for Apache::Perlrun Mode
    Alias /cgi-perl/ /var/www/perl/

<Directory /var/www/perl>
    AllowOverride All
    SetHandler perl-script
    PerlResponseHandler ModPerl::Registry
    PerlOptions +ParseHeaders
    Options -Indexes FollowSymLinks MultiViews ExecCGI
    Order allow,deny
    Allow from all
</Directory>

# set Apache::Registry Mode for /perl Alias
#<Location /perl/*.pl>
#    SetHandler perl-script
#    PerlResponseHandler ModPerl::Registry
#    Options -Indexes ExecCGI
#    PerlSendHeader On
#</Location>

# set Apache::PerlRun Mode for /cgi-perl Alias
#<Location /cgi-perl/*.pl>
#    SetHandler perl-script
#    PerlResponseHandler ModPerl::PerlRun
#    Options -Indexes ExecCGI
#    PerlSendHeader On
#</Location>

<IfModule mod_userdir.c>
    <Directory /home/*/public_html/perl>
	AllowOverride None
	SetHandler perl-script
	PerlResponseHandler ModPerl::Registry
	PerlOptions +ParseHeaders
	Options -Indexes FollowSymLinks MultiViews ExecCGI
	PerlSendHeader On
	Order allow,deny
	Allow from all
    </Directory>
</IfModule>

</IfModule>