use Try::Tiny;
use YAML::Any qw/LoadFile DumpFile/;
use Log::Log4perl qw/get_logger/;
-use Data::Dumper qw/Dumper/;
##################################################
}
prepare_files $meta;
- say Dumper $meta;
my ($files, $generator, $runner, $judge, $testcnt) = map { $meta->{$_} or die "Required parameter missing: $_"} qw/files generator runner judge testcnt/;
}
sub run{
- Log::Log4perl->init('log.conf');
+ Log::Log4perl->init('/etc/gruntmasterd-log.conf');
get_logger->info("gruntmasterd $VERSION started");
chdir tempdir 'gruntmasterd.XXXX', CLEANUP => 1, TMPDIR => 1;
SUBSCRIBE jobs => \&got_job;