perlでcsvの指定フィールドに書き込みする方法

perlを勉強中の初心者です。

以下のような入力ファイル(csv)があった場合、特定のフィールド(この場合"0")を参照して、その数字を元に、出力ファイルには、参照したフィールドからデータ書き込むプログラム方法を教えてください。

---入力ファイル
0,a,b,c
1,d,e,f
2,g,h,i
10,w,s,x

---出力ファイル
0,a,b,c
,1,d,e,f
,,2,g,h,i
,,,,,,,,,,10,w,s,x

No.2 回答者： osamuy 回答日時： 2013/05/19 11:05

質問文の例だと、こんなのとか(添付画像参照)。

基本的に、いったん入力を読み取って、配列やハッシュを駆使して適切なデータ構造を構築し、それを元に望みの結果を出力するという感じです。

なので、
1)入力データがどういうものか?
2)加工法は明確になっているか?
3)出力データはどうあるべきか?
――の点を押さえる必要があります。

この回答へのお礼

お礼が遅れて申し訳ございません。わかりやすい説明ありがとうございます。

お礼日時：2013/05/22 18:25

No.1 回答者： ORUKA1951 回答日時： 2013/05/19 10:53

一旦、配列に入れて、$_[0]の値を元に、unshiftで追加して、元に戻す。

文字列として、後方参照で,を加える。
のいずれか。
　CSVはアプリケーション依存のフォーマットです。(特に内容に,や"を含むとき)
　その点に注意しましょう。

この回答へのお礼

お礼が遅れて申し訳ございません。Perlを少し勉強すると基本中の基本でした。回答ありがとうございます。

お礼日時：2013/05/22 18:22