diff options
| author | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-02-08 01:16:56 +0100 |
|---|---|---|
| committer | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-02-08 01:16:56 +0100 |
| commit | 2e28387613b7de506671f1657ed539d2470caff1 (patch) | |
| tree | 4f50dd249d0dc15462909a9dab577913b8e29178 /webroot | |
| parent | a57b1d79950ce63209e052a1b1f394cf3c6eb588 (diff) | |
Add Apache config template for mod_perl.
Diffstat (limited to 'webroot')
| -rw-r--r-- | webroot/.htaccess | 20 | ||||
| -rw-r--r-- | webroot/.static/.htaccess | 3 | ||||
| -rwxr-xr-x | webroot/lxr.cgi | 36 |
3 files changed, 36 insertions, 23 deletions
diff --git a/webroot/.htaccess b/webroot/.htaccess deleted file mode 100644 index 2c850e5..0000000 --- a/webroot/.htaccess +++ /dev/null @@ -1,20 +0,0 @@ -Options ExecCGI - - -<IfModule mod_perl.c> - PerlModule LXRng::ModPerl; - - <Files *> - SetHandler perl-script - PerlResponseHandler LXRng::ModPerl - </Files> -</IfModule> - - -<Files robots.txt> - SetHandler send-as-is -</Files> - -<Files favicon.ico> - SetHandler send-as-is -</Files> diff --git a/webroot/.static/.htaccess b/webroot/.static/.htaccess deleted file mode 100644 index 68f007e..0000000 --- a/webroot/.static/.htaccess +++ /dev/null @@ -1,3 +0,0 @@ -<Files *> - SetHandler send-as-is -</Files> diff --git a/webroot/lxr.cgi b/webroot/lxr.cgi new file mode 100755 index 0000000..7117d65 --- /dev/null +++ b/webroot/lxr.cgi @@ -0,0 +1,36 @@ +#!/usr/bin/perl +# +# Copyright (C) 2008 Arne Georg Gleditsch <lxr@linux.no> and others. +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along +# with this program; if not, write to the Free Software Foundation, Inc., +# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. +# +# The full GNU General Public License is included in this distribution +# in the file called COPYING. + +use strict; + +use FindBin; +use lib "$FindBin::Bin/../lib"; + +use LXRng ROOT => "$FindBin::Bin/.."; +use LXRng::Web; + +use CGI::Simple qw(-newstyle_urls); +use CGI::Carp qw(fatalsToBrowser); + +my $query = CGI::Simple->new(); + +LXRng::Web->handle($query); + |