my $i = 1;

print "ok " . $i++ . "\n";
$i++ unless $ENV{FAILURE_DO_PASS};
print "ok " . $i++ . "\n";

print "1..2\n";