aboutsummaryrefslogtreecommitdiffstats
path: root/lib/LXRng/ModPerl.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/LXRng/ModPerl.pm')
-rw-r--r--lib/LXRng/ModPerl.pm21
1 files changed, 21 insertions, 0 deletions
diff --git a/lib/LXRng/ModPerl.pm b/lib/LXRng/ModPerl.pm
new file mode 100644
index 0000000..686af11
--- /dev/null
+++ b/lib/LXRng/ModPerl.pm
@@ -0,0 +1,21 @@
+package LXRng::ModPerl;
+
+use strict;
+use LXRng;
+use LXRng::Web;
+
+use Apache2::Const -compile => qw(FORBIDDEN OK);
+use CGI;
+
+use Data::Dumper;
+
+sub handler {
+ my ($req) = @_;
+
+ my $query = CGI->new();
+ LXRng::Web->handle($query);
+
+ return Apache2::Const::OK;
+}
+
+1;