awk之数组和substr配合处理复杂文本合并

文件1内容：
HEADxxxxxx1234567890xxxxxxxxxA
DETLxxxxxxxxxxxxxxx
HEADxxxxxx1289492310xxxxxxxxxB
DETLxxxxxxxxxxxxxxx
HEADxxxxxx1282712985xxxxxxxxxC
DETLxxxxxxxxxxxxxxx
HEADxxxxxx1288677724xxxxxxxxxD
DETLxxxxxxxxxxxxxxx

文件2内容：
A1234567890xxxxxxxxxxxxxxxxx
B1289492310xxxxxxxxxxxxxxxxx
C1282712985xxxxxxxxxxxxxxxxx

想得到输出如下的内容：

HEADxxxxxx1234567890xxxxxxxxxA
00A1234567890xxxxxxxxxxxxxxxxx
DETLxxxxxxxxxxxxxxx
HEADxxxxxx1289492310xxxxxxxxxB
00B1289492310xxxxxxxxxxxxxxxxx
DETLxxxxxxxxxxxxxxx
HEADxxxxxx1282712985xxxxxxxxxC
00C1282712985xxxxxxxxxxxxxxxxx
DETLxxxxxxxxxxxxxxx
HEADxxxxxx1288677724xxxxxxxxxD
DETLxxxxxxxxxxxxxxx

 

读文件1，从第11位起，读取10位，作为卡号，从31位起，读取1位，作为客户号。用这两个变量匹配文件2，如果有匹配记录，输出 “00A1234567890xxxxxxxxxxxxxxxxx”，没有匹配则不输出，不是以"HEAD"开头的直接输出“DETLxxxxxxxxxxxxxxx”

 

awk 'NR==FNR{a[substr($0,1,11)]=$0;next}{print;b=substr($0,length($0))substr($0,11,10);if(b in a){print "00"a[b]}}' 2 1

[解析]
  先读文件2，再读文件1，文件2里截取开头11位内容作为数组a的下标，把整行内容赋值给数组a。读到文件1的第一行，打印第一行，并把该行的客户号和卡号赋值给变量b，判断如果该行的“客户号卡号”作为下标是否存在于数组a中，如果存在，则输出该下标的数组a的值，按要求在前面加00。