my $pipe;
-open $pipe, '|$perl gruntmaster-contest add ct';
+open $pipe, "|$perl gruntmaster-contest add ct";
print $pipe <<'';
My cool contest
MGV
system $perl, 'gruntmaster-contest', 'rm', 'dummy';
withdb { ok !$db->contest('dummy'), 'gruntmaster-contest rm' };
-open $pipe, '|$perl gruntmaster-problem add pb';
+open $pipe, "|$perl gruntmaster-problem add pb";
print $pipe <<'';
Test problem
n