#!/usr/bin/perl

use lib '.';
use Curtains::Control;
use Bod::Config;
use strict;

my $DEBUG = 1;

my $control = Curtains::Control->new;

$control->log("Starting Curtain Controller") if $DEBUG;