t5562: do not depend on /dev/zero
[git] / t / t4018 / perl-skip-end-of-heredoc
1 sub RIGHTwithheredocument {
2         print <<"EOF"
3 decoy here-doc
4 EOF
5         # some lines of context
6         # to pad it out
7         print "ChangeMe\n";
8 }