json格式字符处理

xlw010aya

我有个转成json格式的数据文件，每行大概格式是：
"13912345678":"111,222,333,444,555,666,777"
我希望能输出成
13912345678^333^444^111^222
请问能有这么简单的办法么？

我自己是这样做的：
读取每行，
    cut -d\: -f 1
得到 "13912345678"
    #*\\"去除左边的"
得到  13912345678"
    %\\"*去除右边的"
得到  13912345678

右边的就再cut ， 一次。结果是效率有点低，每秒100个左右，太慢了

希望大神帮忙看看,谢谢了！

jason680

回复 1# xlw010aya

$ awk -F'[:,]+' 'BEGIN{OFS="^"}{gsub("\"","")}NF=5' FILE
13912345678^111^222^333^444

   

moperyblue

1. echo '"13912345678":"111,222,333,444,555,666,777"'|awk -F':|,' '{gsub(/"/,"");OFS="^";print $1,$4,$5,$2,$3}'

复制代码

13912345678^333^444^111^222

1. echo '"13912345678":"111,222,333,444,555,666,777"'|sed -r ':a;s/\^/&/5;tb;s/\x22:\x22|,/^/;ta;:b;s//\n/5;s/\x22//;P;d'

复制代码

13912345678^111^222^333^444

1. echo '"13912345678":"111,222,333,444,555,666,777"'|sed -r ':a;s/\^/&/5;tb;s/\x22:\x22|,/^/;ta;:b;s/\x22//;s/([^^]*\^)([^^]*\^[^^]*)\^([^^]*\^[^^]*)/\1\3^\2/;s/\^/\n/5;P;d'

复制代码

13912345678^333^444^111^222

sunzhiguolu

1. perl -nle 'print join("^",@a[0,3,4,1,2]) if(y/0-9/^/cs and (@a=grep{length}split(/\^/)))' f

复制代码

13912345678^333^444^111^222

云遮雨

sed 's/"//g;s/://g' file | awk -F, '{print $1"^"$4"^"$5"^"$2"^"$3}'
awk -F, '{gsub(":","");gsub("\"","");print $1"^"$4"^"$5"^"$2"^"$3}' file
awk -F, 'BEGIN {OFS="^"} {gsub(":","");gsub("\"","");print $1,$4,$5,$2,$3}' file