主页 / unix / 问题 / 784776
Accepted
peng xiao
Asked: 2024-10-09 18:42:01 +0800 CST

识别第 1 列中存在重复条目的行，如果发现则交换列

  • 772

我们有以下文本文件：

172.55.34.48 172.55.33.95
172.55.32.163 172.55.34.48
172.55.32.163 172.55.33.95

我们需要做的是，如果发现第一列包含之前在该列中遇到的值，则交换这两列。对于每个这样的值（在本例中为 IP 地址），最大出现次数为两次。

在上面的例子中，我们需要 172.55.33.95与上一行已经找到的172.55.32.163内容进行交换。172.55.32.163

我试过

awk 'prev && ($1 != prev) {print seen[prev]} {seen[$1] = $0; prev = $1} END {print seen[$1]}' /tmp/new.txt

但这有助于删除之前已经找到第 1 列条目的行。

text-processing

3 个回答

  1. Best Answer

    答案可能就像这个 awk 程序一样简单：

    $ awk '{found[$1]++; if (found[$1]>1) {buf=$1; $1=$2; $2=buf}} 1' input.txt 
172.55.34.48 172.55.33.95
172.55.32.163 172.55.34.48
172.55.33.95 172.55.32.163

    这将通过增加相应的数组值来将每个列 1 值的出现次数存储在数组中found。如果发现该值大于一，则意味着当前值已经遇到过，列需要交换。

    为此，将列 1 的值存储在缓冲区中，用列 2 的值替换，再用缓冲的值替换列 2 的值。最后，将打印当前行，包括所有修改（如果有），这就是看似“杂散”的含义1。

    这种简单的方法有一个缺点：如果新的第 1 列（以前是第 2 列）值在后面的一行中再次出现在第 1 列中，或者在前一行中已经出现，则不会捕获此错误。改进的版本考虑了后面行中出现的错误，并省略了交换也会产生重复的第 1 列条目的行，如下所示：

    awk '{f[$1]++; if (f[$1]>1) {if (f[$2]>0) {next}; buf=$1; $1=$2; $2=buf; f[$1]++; f[$2]--}} 1' input.txt
    • 2

  2. 在 Perl 中你可以这样做：

    perl -lae 'BEGIN {$, = " "} scalar(grep {$_ eq $F[0]} @buf) ? print(reverse(@F)) : do {print(@F); push(@buf, $F[0])}' input
    • -l\n：在传递给的脚本的每次评估之前和之后自动删除并自动添加默认记录字段分隔符（ ） -e；
    • -a ：根据默认输入字段分隔符 ( )自动拆分每一行。

    脚本会将输出字段分隔符设置为 ，然后对于每一行，它将检查第一个字段是否已存储在 中@buf。

    如果是，就将当前记录反转并打印；否则，就打印当前记录，并将第一个字段添加到@buf。

    % perl -lae 'BEGIN {$, = " "} scalar(grep {$_ eq $F[0]} @buf) ? print(reverse(@F)) : do {print(@F); push(@buf, $F[0])}' input
172.55.34.48 172.55.33.95
172.55.32.163 172.55.34.48
172.55.33.95 172.55.32.163
    • 1

  3. 您的要求不明确，并且您的示例没有涵盖您可能想要表达的所有可能性，但是，使用任何 awk，这都可以实现您可能想要表达的一件事：

    $ awk 'seen[$1]++{t=$2; $2=$1; $1=t} 1' file
172.55.34.48 172.55.33.95
172.55.32.163 172.55.34.48
172.55.33.95 172.55.32.163

    或者你可能想要：

    $ awk 'seen[$1]++{t=$2; $2=$1; $1=t; seen[$1]++} 1' file
172.55.34.48 172.55.33.95
172.55.32.163 172.55.34.48
172.55.33.95 172.55.32.163

    或者：

    $ awk 'seen[$1]++{t=$2; $2=$1; $1=t; seen[$2]--; seen[$1]++} 1' file
172.55.34.48 172.55.33.95
172.55.32.163 172.55.34.48
172.55.33.95 172.55.32.163

    或者：

    $ awk '$1==prev{t=$2; $2=$1; $1=t} {prev=$1} 1' file
172.55.34.48 172.55.33.95
172.55.32.163 172.55.34.48
172.55.33.95 172.55.32.163
    • 1

相关问题