PerlでCSVを扱う - Text::CSV_XS - Perlテックラボ - [SMART]

PerlでCSVを扱う場合、Text::CSV_XSモジュールが便利です。 インストールされていない場合、CPANを使ってインストールしましょう。 Text::CSV_XSのインストール perl -MCPAN -e shell install Text::CSV_XS Text::CSV_XSを使ってCSVを読み込み、ファイルに出力する場合は以下の通りです。 #!/usr/bin/perl -w use strict; use Text::CSV_XS; my $csv = Text::CSV_XS->new ({ binary => 1 }); open my $fh, "<", "t.csv"; open my $fh_out, ">", "t.txt"; while (my $columns = $csv->getline ($fh)) { print $fh_out map({