#!/usr/bin/env perl

#
# Dark Channel Daemon Prototype
#
# Copyright (C) 2015 by DataCore GmbH
#     Amir Guindehi <amir@datacore.ch>
#

BEGIN
{
    # extend search path for require
    unshift(@INC, ("/etc/darkchannel", "/etc", 'lib', '../lib'));
}

use warnings;
use strict;

use DarkChannel::Node::ChannelServer;

MAIN:
{
    dc_channelserver_initialize();
    dc_channelserver_run();
    dc_channelserver_shutdown();
}
