#!/usr/bin/env perl
#---AUTOPRAGMASTART---
use v5.36;
use strict;
use diagnostics;
use English qw(-no_match_vars);
use Carp qw[carp croak confess cluck longmess shortmess];
our $VERSION = 29;
use autodie qw( close );
use Array::Contains;
use utf8;
#---AUTOPRAGMAEND---

my $isDebugging = 0;
    
BEGIN {
    if(defined($ARGV[1]) && $ARGV[1] eq "--debug") {
        print("Development INC activated\n\n");
        unshift @INC, "../lib"; # Point to your local copy of Net-Clacks/lib if you want to play around with the server code without "make install" every time you change something
        
        $isDebugging = 1;
    }   
};      

use Net::Clacks::Server;
    
my $configfile = shift @ARGV;
croak("No Config file parameter") if(!defined($configfile) || $configfile eq '');
        
my $worker = Net::Clacks::Server->new($isDebugging, $configfile);
$worker->run;