Perl vs Windows改行コード

これも同じく今回の一連の仕事で手に入れた知識。どっかのクソソフトは吐き出すファイルの改行コードが全部"\r"だったりするので、これをどーにか扱えんのかと思って探すと、きたよ、Audreyたん。

  use strict;


  open(FILE, $ARGV[0]);

  binmode(FILE, ":raw:eol(LF)");

  while (<FILE>) {

    print;

  }

これいいね。ファイルの改行コードがCR、LF、CRLFのどれでもeol(X)で指定したXの値に統一してくれる。