親の会社でPerl。2バイト目が@の文字が破壊されるバグがあって、その原因を突き止めるのにかなり苦労してしまいました。原因は単純、文字列のトリムの為に正規表現内で全角スペースを使っていたのです。このような事が起こるので、シフトJISを使うのは賢明ではないのですが、読み書きするCSVファイルはシフトJISにしたくて、でもその為の文字コード変換が面倒で。面倒で。面倒で。時間があったら読み書き以外はEUCで処理するようにしようと思っていたのだけど面倒で。ずるずると。あああ。