使用 awk 或 Linux 上的命令行从文件中删除列

发布于 2024-12-06 08:41:12 字数 106 浏览 0 评论 0原文

如何使用 awk 从制表符分隔的字段文件中删除某些列?

c1 c2 c3 ..... c60

例如,删除 3 和 29 之间的列。

How can I delete some columns from a tab separated fields file with awk?

c1 c2 c3 ..... c60

For example, delete columns between 3 and 29 .

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(4

枯叶蝶 2024-12-13 08:41:12

这就是 cut 命令的用途:

cut -f1,2,30- inputfile

默认为 Tab。您可以使用 -d 开关更改它。

This is what the cut command is for:

cut -f1,2,30- inputfile

The default is tab. You can change that with the -d switch.

情未る 2024-12-13 08:41:12

您可以循环遍历所有列并过滤掉不需要的列:

awk '{for (i=1; i<=NF; i++) if (i<3 || i>29) printf $i " "; print""}' input.txt

其中 NF 为您提供记录中的字段总数。
对于满足条件的每一列,我们打印该列,后跟一个空格 " "


编辑:在约翰尼的评论后更新:

awk -F 'FS' 'BEGIN{FS="\t"}{for (i=1; i<=NF-1; i++) if(i<3 || i>5) {printf $i FS};{print $NF}}' input.txt

这通过两种方式进行了改进:

  • 保留原始分隔符
  • 不在末尾附加分隔符

You can loop over all columns and filter out the ones you don't want:

awk '{for (i=1; i<=NF; i++) if (i<3 || i>29) printf $i " "; print""}' input.txt

where the NF gives you the total number of fields in a record.
For each column that meets the condition we print the column followed by a space " ".


EDIT: updated after remark from johnny:

awk -F 'FS' 'BEGIN{FS="\t"}{for (i=1; i<=NF-1; i++) if(i<3 || i>5) {printf $i FS};{print $NF}}' input.txt

this is improved in 2 ways:

  • keeps the original separators
  • does not append a separator at the end
雾里花 2024-12-13 08:41:12
awk '{for(z=3;z<=15;z++)$z="";$0=$0;$1=$1}1'

输入

c1 c2 c3 c4 c5 c6 c7 c8 c9 c10 c11 c12 c13 c14 c15 c16 c17 c18 c19 c20 c21

输出

c1 c2 c16 c17 c18 c19 c20 c21
awk '{for(z=3;z<=15;z++)$z="";$0=$0;$1=$1}1'

Input

c1 c2 c3 c4 c5 c6 c7 c8 c9 c10 c11 c12 c13 c14 c15 c16 c17 c18 c19 c20 c21

Output

c1 c2 c16 c17 c18 c19 c20 c21
清眉祭 2024-12-13 08:41:12

Perl“拼接”解决方案不添加前导或尾随空格:

perl -lane 'splice @F,3,27; print join " ",@F' file

产生输出:

c1 c2 c30 c31

Perl 'splice' solution which does not add leading or trailing whitespace:

perl -lane 'splice @F,3,27; print join " ",@F' file

Produces output:

c1 c2 c30 c31
~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文