一句很蛋疼的脚本

daly88

有一个文本描述数据文件（用于持久化），格式如下

%Section1
i(key1 value1, key2 value 2, ...很多很多)
%Section2
i(key1 val1, key2 val2, ...很多很多)
...
...

怎么写个shell脚本，获取Section2中 key小于100的所以key value对，输出格式：  key1 val1, key2 val2
写了个很蛋疼的脚本：

result="`sed -n '/\%Section2/{n;p;}' $datafile | awk -F '[()]' '{print $2}' | awk -F ',' '{for(i=1;i<=NF;i++) {split($i,a," ");if(a[1]<100) lv[a[1]]=a[2]}} END {ORS=","; for(n in lv) print n, lv[n]}'`"

有没有简洁点的？

kelehaier

1. sed -n '/\%Section2/{n;p;}' $datafile | awk '{sub(/i\(/,"",$0);sub(/\)/,"",$0);split($0,arr,",");}END{for(i in arr){split(arr[i],line," ");if(line[2]<100)print line[1]","line[2];}}'

复制代码

devinht

sed -n '/\%Section2/{n;p;}' $datafile | awk -F '[()]' '{print $2}' |tr "," "\n" |awk '$1<100 {print;} |tr "\n" ","

ywlscpl

回复 1# daly88

1. awk -F '[),(]' '/%Section2/{getline;for (i=2;i<NF;i++) {split($i,m," +");if (m[2]<100) printf $i","}print "";exit}' file

复制代码

yinyuemi

1. awk -v RS=", |i\\\(|\n|)" '/%Section/{p=$1}$1~/^[0-9]/&& $1<100 && p=="%Section2"{output?output=output", "$0:output=$0}END{print output}'  $datafile

复制代码