From 9881490f8c578555aa2349f8223104aa22fc8954 Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Mon, 10 Sep 2012 20:07:18 +0200 Subject: Development server. --- server.pl | 28 ---------------------------- 1 file changed, 28 deletions(-) delete mode 100755 server.pl (limited to 'server.pl') diff --git a/server.pl b/server.pl deleted file mode 100755 index 74e7c09..0000000 --- a/server.pl +++ /dev/null @@ -1,28 +0,0 @@ -#!/usr/bin/perl -CADS - -use strict; -use warnings; -use utf8; - -use MyServer; -use lib 'lib'; -use Fripost::Panel::Interface; - -my $server = MyServer->new(); - -$server->entry_points({ - '/cgi-bin' => 'Fripost::Panel::Interface' -}); - -my @config = 'default.in'; -push @config, 'config.in' if -f 'config.in'; - -# TODO: This is only for testing purposes. Using a blessed target above -# prevents me from logging in. -$server->options({ - '/cgi-bin' => { - PARAMS => { cfg_file => [ @config ], format => 'equal' } - } -}); - -$server->run(); -- cgit v1.2.3