
次の入力ファイル(input.txt)があります。
Main1 one,two,three,four
Main2 five,six,seven,eight
出力ファイル(output.txt)から次のような出力を取得したいと思います。
Main1 one
Main1 two
Main1 three
Main1 four
Main2 five
Main2 six
Main2 seven
Main3 eight
答え1
awk '{ split($2,a,","); for (i in a) print $1, a[i]; }' input.txt
例:
~) $ echo -e "Main1 one,two,th\nMain2 five,six,seven,eight " | awk '{ split($2,a,","); for (i in a) print $1, a[i]; }'
Main1 one
Main1 two
Main1 th
Main2 five
Main2 six
Main2 seven
Main2 eight
答え2
以下はいくつかのオプションです。
シェル
while read main rest; do for i in ${rest//,/$'\n'}; do echo $main $i done done < file
パール
perl -lane 'print "$F[0] $_" for split(/,/,$F[1])' file
アッ
awk -F'[, ]' '{for(i=2;i<=NF;i++){print $1,$i}}' file