Perl-通过公共维度连接文件中的度量的脚本

我想根据公共维度将3个文件中的指标连接到1个文件中

例如：

文件1： A B C 10 20 A D C 30 40 文件2： A B C 100 200 A D C 300 400 文件3： A B C 1000 A D C 3000 输出文件： A B C 10 20 100 200 1000 D C 30 40 300 400 3000

---

我将创建一个散列，其中每个键都是来自文件输入的前3个字段，并遍历每个文件，将值推送到一个数组中，该数组是散列的值。

---

请告诉我您是否希望看到实际的代码。

您真的不需要perl。下面是一个两行shell脚本：

join file1 file2 | sed -e 's/\([0-9]\) [A-Z] [A-Z] /\1 /g' > file4
join file3 file4 | sed -e 's/\([0-9]\) [A-Z] [A-Z] /\1 /g' > file5

---

文件5有您的输出数据

到目前为止您编写了哪些代码？ File 2: A B C 100 200 A D C 300 400 File 3: A B C 1000 A D C 3000 Output File: A B C 10 20 100 200 1000 A D C 30 40 300 400 3000

join file1 file2 | sed -e 's/\([0-9]\) [A-Z] [A-Z] /\1 /g' > file4
join file3 file4 | sed -e 's/\([0-9]\) [A-Z] [A-Z] /\1 /g' > file5