教えて君です。急にperlのメンテをする羽目になったのですが、perlも正規表現が読めなくて困っています。
sjisにて、
$tmp =~ s/?:\x0D\x0A|[\x0D\x0A])?$/,/;
というのは、
$tmpの(「CRの次にLFが続くもの」もしくは「CRまたはLF」)が0もしくは1個続いた後で行末に続くという箇所をカンマで置き換えるという解釈でよろしいでしょうか？