☰

根据引号中的位数解析数据

tag-icon • tag-icon text-processing
根据引号中的位数解析数据

我目前有大量当前格式的数据：

a:7:{i:0;s:4:"9999";i:1;s:4:"10000";i:2;s:4:"10001";i:3;s:4:"10002";i:4;s:4:"10003";i:5;s:4:"10004";i:6;s:4:"989";}

""他们前面的数字有s:4。对于 3 位长的数字应更改为s:3，5 位长的数字应更改为，s:5依此类推。

转换后的数据应如下所示：

a:7:{i:0;s:4:"9999";i:1;s:5:"10000";i:2;s:5:"10001";i:3;s:5:"10002";i:4;s:5:"10003";i:5;s:5:"10004";i:6;s:3:"989";}

每个数据字符串{}都位于其自己的行中data.txt

答案1

怎么样

perl -pe 's/s:\d+:"(.*?)"/sprintf("s:%d:\"%s\"",length($1),$1)/ge'

前任。

$ echo 'a:7:{i:0;s:4:"9999";i:1;s:4:"10000";i:2;s:4:"10001";i:3;s:4:"10002";i:4;s:4:"10003";i:5;s:4:"10004";i:6;s:4:"989";}' | 
    perl -pe 's/s:\d+:"(.*?)"/sprintf("s:%d:\"%s\"",length($1),$1)/ge'
a:7:{i:0;s:4:"9999";i:1;s:5:"10000";i:2;s:5:"10001";i:3;s:5:"10002";i:4;s:5:"10003";i:5;s:5:"10004";i:6;s:3:"989";}

您可以添加-i以就地对文件执行替换。

答案2

#!/usr/bin/env bash

IFS=';'

while read LINE
do

        set -- $LINE

        while [ "$1" ]
        do
                if [[ $1 =~ ^s:[0-9]+:\".*\"$ ]]; then
                        s=${1##*:}
                        printf 's:%d:%s%s' $((${#s}-2)) "$s" "$IFS"
                else
                        printf '%s%s' "$1" "$IFS"
                fi
                shift

        done
        printf '\n'

done < data.txt

该脚本将字段分隔符设置为分号字符，然后迭代 的行data.txt，将每行拆分为分号分隔符上的单独字段。对于以 开头的字段（对于和s:###:"..."的任意值），脚本计算带引号的字符串的长度，并使用该长度值重新格式化字段并添加尾随字段分隔符。与表单不匹配的字段将逐字输出，并再次添加回尾随字段分隔符。###...s:###:"..."

a:7:{i:0;s:4:"9999";i:1;s:5:"10000";i:2;s:5:"10001";i:3;s:5:"10002";i:4;s:5:"10003";i:5;s:5:"10004";i:6;s:3:"989";};

相关内容