PerlでCSV形式のファイルの一部分だけを抽出する方法

質問

Perlをやっていて困っていることがあります。
CSV形式のファイルを開いて、変数に代入した後の処理がわかりません。

どのようにしたいかというと・・・

aaa,bbb,ccc,ddd,eee,fff
ggg,hhh,iii,jjj,kkk,lll
mmm,nnn,ooo,ppp,qqq,rrr
sss,ttt,uuu,vvv,www,xxx
yyy,zzz,111,222,333,444

というファイルを読み込んだとします。その後
'fff' の部分だけをスカラー変数に取り込みたいときにはどのような
関数を実行すればいいのでしょうか。

困っています、お願いします。

回答No.1

haporun · ベストアンサー

fffの部分ってのは、各行の6列目ってことですか?
指摘が曖昧なので、ようわかりませんが。

open(F, $file);
@s = <F>;
@t = split(/,/, $s[0]);

とすると中身をコンマを区切り文字として、分割した配列が得られます。
$t[0]は1番目=aaa、$t[1]は2番目=bbb・・・。

これを元にお勉強してみてください。