perlにencodingを指定するとき、shiftjisなのかcp932なのかちゃんと考えないといけない。でないと全角マイナスの扱いが違ってくる。 hz.pl #!/usr/bin/perl use strict; use warnings; use utf8; use Encode; use Data::Dumper; binmode STDOUT => 'utf8'; #…

Encode.pmとPerlIOの備忘録も兼ねて。 perlでShift_JISのCSVを読み込みUTF-8にて標準出力に出力。CSVの解析はText::CSV_XSを使用、PerlIOを使って入出力。 #!/usr/bin/perl use strict; use warnings; use Text::CSV_XS; use utf8; # このファイルはUTF-8 us…