From fa170afd817648f306e322802ca85b6abbd37f74 Mon Sep 17 00:00:00 2001
From: unknown <andrew@.cern.ch>
Date: Tue, 21 Jun 2011 16:33:26 +0200
Subject: Initial commit

---
 cgi-bin/searchplugin.plx | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 cgi-bin/searchplugin.plx

(limited to 'cgi-bin/searchplugin.plx')

diff --git a/cgi-bin/searchplugin.plx b/cgi-bin/searchplugin.plx
new file mode 100644
index 0000000..01ff41f
--- /dev/null
+++ b/cgi-bin/searchplugin.plx
@@ -0,0 +1,25 @@
+# Use me
+#
+use CGI;
+use strict;
+use Globals;
+use Globals qw($CGIROOT);
+use Globals qw($APPNAME);
+
+my $WEBPAGE;
+
+# Start the page.
+#
+open TEMPLATE, "../templates/searchplugin.template" or die;
+
+while ( <TEMPLATE> )
+{
+  $WEBPAGE .= $_;
+}
+
+
+$WEBPAGE =~ s/%CGIROOT%/$CGIROOT/g;
+$WEBPAGE =~ s/%APPNAME%/$APPNAME/g;
+
+print $WEBPAGE;
+exit;
-- 
cgit v1.2.3