- mkdir 'log' unless -d 'log';
- IO::File->new('>log/meta.yml')->close unless -f 'log/meta.yml';
- flock my $logmetafh = IO::File->new('<log/meta.yml'), LOCK_EX;
- my $logmeta = LoadFile 'log/meta.yml';
+ my $log = exists $meta->{contest} ? "ct/$meta->{contest}/log" : 'log';
+ mkdir $log unless -d $log;
+ IO::File->new(">$log/meta.yml")->close unless -f "$log/meta.yml";
+ flock my $logmetafh = IO::File->new("<$log/meta.yml"), LOCK_EX;
+ my $logmeta = LoadFile "$log/meta.yml";