質問: 条件抽出の方法について教えてください。 以下の家族名簿から代表者だけ抽出するにはどうしたらよいのでしょうか?以下のテキストファイルの場合、1項目の番号が家族番号になります。 member.txt 1,山田太郎 1,山田花子 1,山田凛 2,田中一郎 2,田中桂子 3,佐藤圭太 3,佐藤洋子 抽出結果を、 山田太郎,田中一郎,佐藤圭太としたいのです。 以上、わかる方がいらっしゃればアドバイスお願いします。
回答: open(fh,"member.txt"); while(){ if(/^(\d+),/&&$1!=$flg){ $famly.=(split(/,|\n/))[1].','; } $flg=$1; } close fh;