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>
とか書ける.