in reply to Redirect Here-document contents

perldoc -f print
print FOO <<'__FOR_FOO__'; heredoc __FOR_FOO__