如何用Awk处理含PRWD_V的行输出指定字段及TCL实现方法

需求说明 #

针对目标文本文件，处理规则如下：

• 若行内包含PRWD_V字符串，输出该行以分号;分隔的第2个字段（自动去除字段首尾多余空格）
• 若行内不包含PRWD_V字符串，原样输出整行

正确的Awk写法 #

你之前的Awk代码存在逻辑重复、判断逻辑不准确的问题，以下是正确实现：

写法一（简洁版） #

awk -F';' '/PRWD_V/ {gsub(/^[[:space:]]+|[[:space:]]+$/, "", $2); print $2} !/PRWD_V/ {print $0}' file1

写法二（可读性更强） #

awk -F';' '{
    if (/PRWD_V/) {
        gsub(/^[[:space:]]+|[[:space:]]+$/, "", $2)
        print $2
    } else {
        print $0
    }
}' file1

代码解释 #

• -F';'：将字段分隔符设置为分号
• /PRWD_V/：判断当前行是否包含目标字符串
• gsub(/^[[:space:]]+|[[:space:]]+$/, "", $2)：清除第2个字段首尾的空格，避免输出多余空白
• 匹配时输出处理后的第2字段，不匹配时直接输出原行$0

TCL实现方案 #

同样可以用TCL的字符串处理和文件操作完成需求：

set fp [open "file1" r]
while {[gets $fp line] != -1} {
    if {[string match "*PRWD_V*" $line]} {
        set parts [split $line ";"]
        set target_str [string trim [lindex $parts 1]]
        puts $target_str
    } else {
        puts $line
    }
}
close $fp

代码解释 #

• open "file1" r：以只读模式打开目标文件
• gets $fp line：逐行读取文件内容到变量line
• string match "*PRWD_V*" $line：判断当前行是否包含目标字符串
• split $line ";"：将行内容按分号分割为列表
• string trim [lindex $parts 1]：取出列表第2个元素（TCL列表索引从0开始）并清除首尾空格
• 匹配时输出处理后的字段，不匹配时输出原行

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