diff options
| author | Paul Buetow <paul@buetow.org> | 2018-12-14 16:34:09 +0200 |
|---|---|---|
| committer | Paul Buetow <paul@buetow.org> | 2018-12-14 16:34:09 +0200 |
| commit | 53a3a612a6f506578402099921bbd130d5791fe1 (patch) | |
| tree | 9e9d0cac320e1bb3d1887f47ed518df2e58d75e3 /index.pl | |
| parent | 94b9f678a89f240cb2cebdc6be53a81d95049715 (diff) | |
adjusttments for centos7
Diffstat (limited to 'index.pl')
| -rwxr-xr-x | index.pl | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/index.pl b/index.pl deleted file mode 100755 index 18fb0d4..0000000 --- a/index.pl +++ /dev/null @@ -1,28 +0,0 @@ -#!/usr/local/bin/perl - -# Xerl (c) 2005-2011, 2013-2015, 2017-2018 by Paul Buetow -# -# E-Mail: xerl@dev.buetow.org WWW: http://xerl.buetow.org -# -# This is free software, you may use it and distribute it under the same -# terms as Perl itself. - -use strict; -use warnings; - -use v5.14.0; -use lib qw(.); - -use Xerl; - -use Socket; -use Sys::Hostname; - -my $host = hostname(); -my $config = - -e "xerldev.conf" - ? "xerldev.conf" - : ( -e "xerl-$host.conf" ? "xerl-$host.conf" : 'config.conf' ); - -my $xerl = Xerl->new( config => $config ); -$xerl->run(); |
