Plan 9 from Bell Labs’s /usr/web/sources/contrib/gabidiaz/root/sys/src/cmd/perl/lib/Test/Harness/t/ok.t

-f "core" and unlink "core";
print <<END;
1..4
ok 1
ok 2
ok 3
ok 4
END