C:\Users\Laurent>perl -e "print qq{foo\nbar}" > foobar.txt

C:\Users\Laurent>type foobar.txt
foo
bar

##</code><code>##

66 6F 6F 0D 0A 62 61 72                       ; foo..bar