From f944b2592d581ddb7e6c7614ea3766328084b682 Mon Sep 17 00:00:00 2001
From: root <root@rbsd.ankarstrom.se>
Date: Fri, 23 Apr 2021 00:29:32 +0000
Subject: First commit

---
 Inject.pm | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 Inject.pm

(limited to 'Inject.pm')

diff --git a/Inject.pm b/Inject.pm
new file mode 100644
index 0000000..5b6df8d
--- /dev/null
+++ b/Inject.pm
@@ -0,0 +1,25 @@
+package Apache::Inject;
+
+use strict;
+use warnings;
+
+use Apache2::CmdParms ();
+use Apache2::Module ();
+use Apache2::Const qw/OR_LIMIT TAKE12/;
+
+my @directives = (
+	{ name => 'Inject',
+	  func => __PACKAGE__.'::Inject',
+	  req_override => OR_LIMIT,
+	  args_how => TAKE12,
+	  errmsg => 'Inject HeadFile[!] FootFile[!]' }
+);
+Apache2::Module::add(__PACKAGE__, \@directives);
+
+sub Inject {
+	my ($self, $parms, @args) = @_;
+	$parms->add_config(['SetHandler perl-script',
+	                    'PerlHandler Apache::Inject::Handler']);
+}
+
+1;
-- 
cgit v1.2.3