1
ifaii 2018 年 11 月 17 日
x='|STRTOBEINSERT|'
perl -pe "s/(.*?)(,)(.*?)(,)(.*$)/\1\2\3$x\4\5/g || s/(.*?)(,)(.*$)/\1$x\2\3/g" filename 我又复习了一次 perl 的用法 |
2
ifaii 2018 年 11 月 17 日 看错题目了,稍微改一下参数位置即可
x='|STRTOBEINSERT|' perl -pe "s/(.*?)(,)(.*?)(,)(.*$)/\1\2\3$x\4\5/g || s/(.*?)(,)(.*$)/\1\2\3$x/g" filename |
3
l76862157 2018 年 11 月 17 日 awk -F',' '{if(NF==2){print $0", STRTOBEINSERT"} else if(NF==3){print $1","$2", STRTOBEINSERT,"$3}else{print}}'
|
4
DiamondbacK 2018 年 11 月 17 日 sed 's/[^,]*,[^,]*/&,STRTOBEINSERT/'
gawk 'NF>1 {$2=$2 ",STRTOBEINSERT"} {print}' FS=, OFS=, |
5
uuspider 2018 年 11 月 17 日 sed 's/\([^,]*,[^,]*\)\(.*\)/\1,STRTOBEINSERT\2/'
|
6
maxduke OP 以上各位回复都感谢啦,🙏
|