summaryrefslogtreecommitdiff
path: root/index.fpl
diff options
context:
space:
mode:
authorPaul Buetow (mars.fritz.box) <paul@buetow.org>2013-09-28 14:36:08 +0200
committerPaul Buetow (mars.fritz.box) <paul@buetow.org>2013-09-28 14:36:08 +0200
commitf3edcebfc981ac077bcd61aac2dd3d1682c41bc2 (patch)
tree8947dbab833b5e8c133bd949f9ddc793bb454480 /index.fpl
parent6687ecb69c355c987948d4a2fcfce90b60904acd (diff)
parent6460ff71ae10f85d7dc12fae40d4c7f05ea41db7 (diff)
Merge branch 'hosts' of git.buetow.org:/git/xerl into hosts
Diffstat (limited to 'index.fpl')
-rwxr-xr-xindex.fpl21
1 files changed, 0 insertions, 21 deletions
diff --git a/index.fpl b/index.fpl
deleted file mode 100755
index d13cd6f..0000000
--- a/index.fpl
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Xerl;
-
-use FCGI;
-use Socket;
-use Sys::Hostname;
-
-my $host = hostname();
-my $config =
- -e "xerldev-$host.conf"
- ? "xerldev-$host.conf"
- : ( -e "xerl-$host.conf" ? "xerl-$host.conf" : 'config.conf' );
-
-while ( FCGI::accept >= 0 ) {
- my Xerl $xerl = Xerl->new( config => $config );
- $xerl->run();
-}