如何在awk中使用if块实现指定列区间空白替换为0的操作

可用代码 #

awk '
{
    # 提取25-34位字符区间
    pos25_34 = substr($0, 25, 10)
    # 25-34位为空白的行直接输出
    if (pos25_34 ~ /^[[:blank:]]*$/) {
        print
        next
    }
    # 提取10-19位字符区间
    pos10_19 = substr($0, 10, 10)
    # 仅10-19位为空白的行，替换该区间为10个0
    if (pos10_19 ~ /^[[:blank:]]*$/) {
        $0 = substr($0, 1, 9) "0000000000" substr($0, 20)
    }
    # 输出处理后的结果
    print
}' scr2

原脚本的核心问题 #

• 子串提取放在了BEGIN块中：BEGIN块仅在处理所有行之前执行1次，无法逐行获取对应位置的字符，需要将提取逻辑放到主处理块中逐行执行
• 正则匹配语法错误：awk中判断字符串是否匹配正则需要使用~运算符，不能直接用==和正则字面量比较；匹配全空白的正确正则为^[[:blank:]]*$，可匹配任意长度的空格、制表符等空白字符
• 逻辑顺序错误：需要优先判断25-34位是否为空白，符合条件直接输出即可，不需要执行后续修改逻辑
• 替换逻辑错误：原脚本错误操作了25-34位的内容，实际需要修改的是10-19位区间
• 操作符混用：原判断语句中误将赋值符=作为判断符使用，会导致逻辑混乱

内容的提问来源于stack exchange，提问作者Carbon