Perlでcsvファイルを読み込んで計算する方法（初心者です）

質問

csvファイルに以下のようなデータが入っています。
ID，X座標，Y座標
0,1.22,3.42
1,3.24,4.52
2,5.34,7.87
（こういうのがID1000までずっと続きます）

このデータから一行ずつ，Y座標－X座標を計算させて出力したいです。
とても困っているので解答お願いします。

回答No.1

sakusaker7 · ベストアンサー

まさか一行ずつ読み取るのもどうやるかわからないということはないですよね。

> 0,1.22,3.42

これが $line という変数に入っているとして、
($id, $x, $y) = split q{,}, $line;
とすれば、
0 が $idに
1.22が$xに
3.42が$yに入ります。
あとは煮るなり焼くなりご自由に。

@fileds = split q{,}, $line;

のように配列変数で受けてもOKです。

ファイルにヘッダ行があるのなら適当に見分けてください。

お礼

無事動きました！どうもありがとうございます。