#
# dweather - a distributed weather station
#
-# copyright (c) 2012 Dirk Koopman G1TLH
+# Copyright (c) 2012-2014 Dirk Koopman G1TLH
#
#
use strict;
use warnings;
+use 5.01001;
use lib qw(. ./blib ./lib ./DWeather/lib);
use DWeather::Debug;
use AnyEvent;
-my $sigint = AnyEvent->signal (signal => "INT", cb => sub { my $sig = shift; terminate("on signal $sig")});
-my $sigterm = AnyEvent->signal (signal => "TERM", cb => sub { my $sig = shift; terminate("on signal $sig")});
-
dbginit();
dbg("*** dweather started");
-my $cv = AnyEvent->condvar;
-my @res = $cv->recv;
-
exit 0;