尴尬变量和函数语法

Question

我想在文本中删除“ _”和“：”：然后将文本转换为尴尬的小写，但无法正常工作。这是一个简单的data.txt文件：

Count_Part:AA,1,2,3,4,5
Name_Date:BB,4,5,6,7,8

和我的脚本process.awk：

BEGIN{
  FS=",";
}
{
        print("raw -->", $1);
        replaced=$gsub(/_|:/, "", $1);
        print("replacement -->", $replaced);
        lowered=$tolower($replaced);
        print("to lowercase -->", $lowered);
        print("\n");
}

但是我从cat data.txt | awk -f process.awk是这样，这不是我所期望的：

raw --> Count_Part:AA
replacement --> CountPartAA
to lowercase --> CountPartAA 1 2 3 4 5


raw --> Name_Date:BB
replacement --> 6
to lowercase -->

我想知道1）为什么countpartaa不打印为countpartaaa，而2 ）为什么data.txt的第二行没有与第一行相似的输出。

我怀疑这是由于变量分配和函数返回语法所致，但我无法使其起作用。我的预期输出就是这样：

raw --> Count_Part:AA
replacement --> CountPartAA
to lowercase --> countpartaa


raw --> Name_Date:BB
replacement --> NameDateBB
to lowercase --> namedatebb

请帮助。谢谢！

Answer 1

您接近，需要在功能和变量上删除Sigills $ $ 1：

BEGIN{
  FS=",";
}
{
        print("raw -->", $1);
        gsub(/_|:/, "", $1);     # return integer and modify $1 directly 
        replaced=$1
        print("replacement -->", replaced);
        lowered=tolower(replaced);
        print("to lowercase -->", lowered);
        print("\n");
}

输出

raw --> Count_Part:AA
replacement --> CountPartAA
to lowercase --> countpartaa


raw --> Name_Date:BB
replacement --> NameDateBB
to lowercase --> namedateb

Answer 2

你是这样的吗？

{m,n,g}awk '$!NF=tolower($!(NF=NF))' FS='[_:]' OFS=
 
countpartaa,1,2,3,4,5
namedatebb,4,5,6,7,8

Answer 3

如前所述，您不应使用$进行前缀函数调用，因此不要：

replaced=$gsub(/_|:/, "", $1);

但是

replaced=gsub(/_|:/, "", $1);

您也误解了gsub的工作方式，来自 gnu awk用户指南

gsub（regexp，替换[，target]）

search target 最长，最左， nonoverplapping 匹配子字符串可以找到并用替换。（...）gsub（）函数返回所做的替换数。（...）

因此您可能会忽略返回值，如果您只需要更改字符串，例如，如果您需要从第一列中删除数字，则可能只需

awk '{gsub(/[0-9]/, "", $1);print}' file.txt