.csvから一行ずつ読んで
chompして
ifで場合分けして
真ならchopして別のものを足す
偽なら,を足す
その後、配列にぶち込んでいく
ということを期待して
open(FP,"hoge.csv")||die();
while(my $tmp=<FP>){
chomp($tmp);
if(場合分け){
chop($tmp);
$tmp.="別のもの";
}else{
$tmp.=",";
}
push(@arr,$tmp);
}
close(FP);
としました。結果、chopが働いていないようでした。
お力添えを...orz