use File::Slurp qw/slurp/;
use Log::Log4perl qw/get_logger/;
-our $VERSION = "5999.000_001";
+our $VERSION = "5999.000_002";
##################################################
if (exists $meta->{okfile}) {
$ok = $meta->{okfile}[$test - 1]
} else {
- $ok = slurp "/var/lib/gruntmasterd/pb/$meta->{problem}/$test.ok"
+ my $ct = defined $Gruntmaster::Data::contest ? "ct/$Gruntmaster::Data::contest" : '';
+ $ok = slurp "/var/lib/gruntmasterd/$ct/pb/$meta->{problem}/$test.ok"
}
$out =~ s/^\s+//;