当 K 列为空时使用 AWK/Perl 提取行

Question

我的数据如下所示：

foo 78 xxx
bar    yyy
qux 99 zzz
xuq    xyz

它们是制表符分隔的。 如何提取第 2 列为空的行，产生

bar    yyy
xuq    xyz

我尝试过此操作但似乎不起作用：

awk '$2==""' myfile.txt 

Answer 1

您需要将字段分隔符专门设置为 TAB 字符：

> cat qq.in
  foo     78      xxx
  bar             yyy
  qux     99      zzz
  xuq             xyz
> cat qq.in | awk 'BEGIN {FS="\t"} $2=="" {print}'
  bar             yyy
  xuq             xyz

awk 的默认行为是将 FS 视为 SPACE< /kbd>（默认值）作为特殊情况。从手册页：

在 FS 是单个空格的特殊情况下，字段由空格和/或制表符和/或换行符运行分隔。 （我的斜体）

Answer 2

perl -F/\t/ -lane 'print unless $F[1] eq q//' myfile.txt

命令开关

• -F 告诉 Perl 在什么分隔符上自动分割（本例中为制表符）
• -a 启用自动分割模式，在指定的位置分割每一行填充数组的分隔符 @F
• -l 自动在每个打印行的末尾附加换行符 "\n"
• -n 逐行处理文件
• -e 将第一个带引号的参数视为代码而不是文件名

Answer 3

grep -e '^.*\t\t.*
将 grep 由字符-制表符-制表符-字符组成的每一行（制表符之间没有任何内容）。
 myfile.txt

将 grep 由字符-制表符-制表符-字符组成的每一行（制表符之间没有任何内容）。