path: root/gnu/usr.bin/perl/t/lib/sample-tests/too_many

print <<DUMMY;
1..3
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
DUMMY

exit 4;  # simulate Test::More's exit status