perlの改行コードと文字コードの指定
Layer の crlf というものを使うと,print "\n"
で,CR + LF を書いてくれる.
また,読む時には,CR + LF が "\n"
になる.
読む時には都合の良いことに単なる LF も "\n"
として読んでくれるようだ.
Layer は,並べて書けるらしい.
open(F, ">:crlf:encoding(shiftjis)", $file)
とか,
open(F, "<:crlf:encoding(shiftjis)", $file>
とか書ける.