10000的文件如何1000行1000行的操作

chenjiali1

大家好，我有个10000行的A文件，想1000行1000行的来读取，每1000行和另外一个B文件的行内容查询是否一致。请问能否实现最后输出10个数，分别表示读取A文件10次（每次读取1000行，按顺序读），在另外一个文件B里查询到的个数。我简单的写了一下，实现不了
cat 1.txt |for (i=1;i<=10000;i+1000){sed -n 'i,(i+1000)p'} |awk 'NR==FNR{x[$1]=$0}NR>FNR{if(x[$1])print x[$1]}' - LB.id
请各位高手帮忙指教。

fh21_xuejinlian

#!/bin/bash
#
for((i=0;i<=100000;i=i+1000))
do
sed -n '$i,$i+999p' |awk 'NR==FNR{a[$0]=$0;next}a[$0]{print $0}' file1 file2
done
不知道可以不

shang2010

sed -n '$i,$i+999p' |awk 'NR==FNR{a[$0]=$0;next}a[$0]{print $0}' file1 file2


ok

moperyblue

最终要实现什么效果? 有样例数据吗?

sunzhiguolu

1. #!/usr/bin/perl
   
2. use strict;
   
3. use warnings;
   
4. use Tie::File;
   
5. 
   
6. tie (my @aA, 'Tie::File', shift);
   
7. tie (my @aB, 'Tie::File', shift);
   
8. 
   
9. for (my $n = 999; $n < scalar (@aA); $n += 1000){
   
10.     #your codes is here
    
11. }
    
12. 
    
13. untie (@aA);
    
14. untie (@aB);

复制代码