外部記憶装置

PerlでCSV

• kenji
• 11:08
• コメント (1)
• カテゴリー:プログラム

PerlでCSVを読む必要が出てきて、解決したのでそれのメモ。
Text::CSV_XSの扱い方と、Root権限が無い環境での一般ユーザ環境へのCPANを使用したライブラリのインスコ。

まずText::CSV_XS
perl - CSVはText::CSV(_XS)?で

Text::CSV_XSがインスコされていれば良いんだけど、無い場合はインスコする。
Root権限が無いので一般ユーザ環境へインスコする。

一般ユーザ環境におけるCPANモジュールの使い方

$perl -MCPAN -e shell
install Text::CSV_XS
してソースコードにインスコしたライブラリを参照するよう設定を記述する。
use lib '/home/USER/perl/lib/perl5';
use lib '/home/USER/perl/lib/perl5/site_perl';
use Text::CSV_XS;
みたいな感じで。

日本語を扱う場合は以下のように{binary=>1}が必要とのこと。
my $csv = Text::CSV_XS->new({binary=>1});

CPANのライブラリはPerlのバージョン毎にインストールされるようなので、自分でPerlをインストールし、そのバージョンのライブラリを入れたい場合は以下のようにする。
$/home/USER/bin/perl -MCPAN -e shell
みたいな感じで。