寻找文件中的多行多列内容并输出对应行（比较繁琐，谢谢）

greaterwei

文件refs.dat 包含以下多行多列内容
ACBACU        ACPRCU        …
ACCAFA        ADESXA        …
CATPAL        AOXSCH        …
CDACET        …        
CDCAZA        …        
…               
…               
        
文件cons.dat中内容如下：
ACBACU        1.397        0.854        2.782        0        0        0.211        4 4 4        4        4        4  ...
ACPRCU        3.535        2.441        1.565        0        0        0.373        3 2 3        3        2        3  ...
AOXSCH        2.159        1.340        3.080        0        0        0.365        3 2 3        3        2        3  ...
CATPAL         3.807        2.039        2.788        0        0        0.386        4 3 3        4        3        3  ...
CDCAZA        4.439        2.496        1.525        0        0        0.390        3 1 3        3        1        3  ...
…
…

refs.dat 中有约50列数据，每列长度不一；cons.dat中有约20万行数据，每行10列。

现在要求检测cons.dat 第一列中是否含有refs.dat中的内容并输出
检测规则为：先在cons.dat 第一列中 检测refs.dat 的第一列内容，然后提取对应行内容，并输出成文件1.dat；
                 再在cons.dat 第一列中 检测refs.dat的 第二列内容，然后提取对应行内容，并输出成文件2.dat；
                ...
                ...
                最后，未找到的refs.dat的内容按列生成新文件ref-left.dat                                          refs.dat中第n列的结果若全部找到，则在ref-left.dat中依然生成空列；若一个都没找到，依然生成空文件n.dat
               


如此，输出ref-left.dat的内容应为：
ACCAFA        ADESXA        …
CDACET        …                …
…                …        
…               

1.dat的内容应为：
ACBACU        1.397        0.854        2.782        0        0        0.211        4 4 4        4        4        4  ...
CATPAL         3.807        2.039        2.788        0        0        0.386        4 3 3        4        3        3  ...
CDCAZA        4.439        2.496        1.525        0        0        0.390        3 1 3        3        1        3  ...
…
…

2.dat的内容应为：
ACPRCU         3.535        2.441        1.565        0        0        0.373        3 2 3        3        2        3  ...
AOXSCH        2.159        1.340        3.080        0        0        0.365        3 2 3        3        2        3  ...
…
…

3.dat的内容应为：...

最后，如果能够把上述结果再分别直接输出至report.xls文件的各个sheet（即sheet1是ref-left.dat的内容，sheet2是1.dat的内容，sheet3是2.dat的内容，...）更好。

十分感谢！

Newbee_Mofi

太高深了，飘过~

greaterwei

回复 2# Newbee_Mofi

我可以一个一个的弄，但是那样的话太浪费时间了

Newbee_Mofi

回复 3# greaterwei

感觉你使用shell的水平 比我高多了 我才刚学会定时任务 简单的提数脚本编写

greaterwei

回复 4# Newbee_Mofi

我只会皮毛。。就是来求助的。。

龙牙地主天

1. awk 'NR==FNR{a[$1]=$0 ; next}{for(i in a) {if($1==i) {print a[$1] > "1.dat" ; $1="\t"} ;  if($2==i) {print a[$2] > "2.dat" ; $2="\t"}} $0=$0 ; print > "ref-left.dat"}' cons.dat refs.dat

复制代码

zxy877298415

回复 1# greaterwei

1. awk 'FNR==NR{for(i=1;i<=NF;i++) a[NR" "i]=$i;m=NR;n=NF;next}{for(i=1;i<=m;i++) {for(j=1;j<=n;j++) if(a[i" "j]==$1) {print $0 >>j".dat";delete a[i" "j]}}}END{for(i=1;i<=m;i++) {for(j=1;j<=n;j++) {if(a[i" "j]) s=s?s" "a[i" "j]:a[i" "j]} b[++t]=s;s=""} for(i=1;i<=t;i++) if(b[i]) print b[i]>>"ref-left.dat"}' refs.dat  cons.dat
   

复制代码

excel的那个自己手工来吧，不知道shell怎么操作excel！

wh7211

回复 1# greaterwei

1. awk 'FILENAME==ARGV[1]{a[$1]=$0;next}{for(i in a){for(j=1;j<=NF;j++){if($j~i){$j="";print a[i]>j".dat"}}}}{for(i=1;i<=NF;i++){s[i]=s[i]?s[i]" "$i:$i}}END{m1=split(s[1],t1);m2=split(s[2],t2);m=m1>m2?m1:m2;for(i=1;i<=m;i++){print t1[i],t2[i]>"ref-left.dat"}}' cons.dat refs.dat

复制代码

greaterwei

回复 6# 龙牙地主天

谢谢您的回复！您的代码可以运行，但是3列过后的数据没有输出