use File::Slurp qw/write_file/;
use Log::Log4perl qw/get_logger/;
-our $VERSION = '5999.000_004';
+our $VERSION = '5999.000_005';
##################################################
sub generate{
my ($test, $meta) = @_;
get_logger->trace("Generating test $test ...");
- if (exists $meta->{infile}) {
+ if (exists $meta->{infile}) { # uncoverable branch false
write_file 'input', $meta->{infile}[$test - 1]
} else {
- copy "/var/lib/gruntmasterd/pb/$meta->{problem}/$test.in", 'input'
+ copy "/var/lib/gruntmasterd/pb/$meta->{problem}/$test.in", 'input' # uncoverable statement
}
}