summaryrefslogtreecommitdiff
path: root/index.pl
diff options
context:
space:
mode:
Diffstat (limited to 'index.pl')
-rwxr-xr-xindex.pl8
1 files changed, 7 insertions, 1 deletions
diff --git a/index.pl b/index.pl
index 8afda26..d5a4ef3 100755
--- a/index.pl
+++ b/index.pl
@@ -5,6 +5,12 @@ use warnings;
use Xerl;
-my Xerl $xerl = Xerl->new( config => 'config.txt' );
+use Socket;
+use Sys::Hostname;
+
+my $host = hostname();
+my $config = -e "config-$host.txt" ? "config-$host.txt" : 'config.txt';
+
+my Xerl $xerl = Xerl->new( config => $config );
$xerl->run();