我有一个这样的文本文件。
2XKJ;2XKK; B0V9T6
2XKJ;2XKK; B0VP98
3TSG; D3X610
我还有另一个包含 PDB ID 的文件。
2XKJ
2XKJ
2XKJ
2XKK
我想要这样的输出
2XKJ B0V9T6 B0VP98
2XKJ B0V9T6 B0VP98
2XKJ B0V9T6 B0VP98
2XKK B0V9T6 B0VP98
如何使用perl
,awk
或 linux获得此输出
答案1
和awk
:
awk -F ';[[:blank:]]*' '
!file1_done {for (i = 1; i < NF; i++) val[$i] = val[$i] " " $NF; next}
{print $1 val[$1]}' file1 file1_done=1 file2