1
0
Fork 0
git/t/t4018/perl-skip-end-of-heredoc
Daniel Baumann 54102a2c29
Adding upstream version 1:2.47.2.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
2025-06-23 07:43:39 +02:00

8 lines
127 B
Text

sub RIGHTwithheredocument {
print <<"EOF"
decoy here-doc
EOF
# some lines of context
# to pad it out
print "ChangeMe\n";
}