unix – AWK根据从第二个文件中选择的标题从文件中提取列

我有以下问题,我想在awk中解决.我有一个大的文本表,逗号分隔,由100k行和5k列组成.第一行是标题,第一列是记录标识.然后,我有第二个文本文件,其中包含第一个文件中的标头的子集.我想提取第一个文件的所有列,其标题包含在第二个文件中给出的列表中.这是输入和所需输出的示例:

DATA.TXT

ID,head1,head2,head3,head4  
    1,25.5,1364.0,22.5,13.2  
    2,10.1,215.56,1.15,22.2

LIST.TXT

head1  
head4

期望的输出

ID,head4  
1,13.2  
2,22.2

任何人都可以给我一些关于如何在awk中解决这个问题的建议,或者通过unix脚本来解决这个问题?在此先感谢您的帮助!

我有一个想法,但由于我没有shell编程经验(并且不知道awk),这看起来像是以一种荒谬的方式重新发明了一些轮子:
$cat DATA.TXT 
ID,head4
1,13.2
2,22.2

$cat LIST.TXT 
head1
head4

$cols=($(sed '1!d;s/,/\n/g' DATA.TXT | grep -nf LIST.TXT | sed 's/:.*$//'))

$cut -d ',' -f 1$(printf ",%s" "${cols[@]}") DATA.TXT 
ID,22.2

附:我从thisthis答案中使用了一些关于bash数组的非常基本的想法.

相关文章

普通模式 >G 增加当前行到文档末尾处的缩紧层级 $ 移动到本行的末尾 . 相当于一个...
原文连接: https://spacevim.org/cn/layers/lang/elixir/ 模块简介 功能特性 启用模块 快捷键 语言专属...
原文连接: https://spacevim.org/cn/layers/lang/dart/ 模块简介 功能特性 依赖安装及启用模块 启用模...
 =   赋值操作符,可以用于算术和字符串赋值 +        加法计算     -        减法运算...
1.根据包名来查看指定的APP指定数据 adb shell "top | grep com.xxx.xxx" 由于这样打印出来的数...
ctrl+F 向下翻页 ctrl+B 向下翻页 u 取消最近一次操作 U 取消当前行的操作 ZZ 保存当前内容并退出 gg 跳...