求助使用gawk处理两个文本取异

Tr4c3e

grep: memory exhausted   内存耗尽了。物理内存16G ，文本300多M, 回复 9# Shell_HAT


   

mcshell

1. 
   
2. #!/usr/bin/perl
   
3. use strict;
   
4. use warnings;
   
5. my %hash;
   
6. open FA,"a" or die "$!";
   
7. map{$hash{$_}++}<FA>;
   
8. close FA;
   
9. open FB,"b" or die "$!";
   
10.   map{if(exists($hash{$_})){ }else{print $_}}<FB>;
    
11. close FB;

复制代码

回复 11# Tr4c3e