求助 ，文本处理

zimuyunren

我刚试了下  如果文件两个文件都是这几行就可以  但实际文件的 3000多行 和1800行 就不行了 ，什么问题？

yestreenstars

回复 11# zimuyunren
估计是数组不够用了~

   

zimuyunren

我把文件传上来

zimuyunren

我吧文件打包了 这是实际文件



回复 10# WilliBhamlll


   

zimuyunren

那有解决办法吗 ？回复 12# yestreenstars


   

yestreenstars

回复 15# zimuyunren
试一下用perl~

1. #!/usr/bin/perl
   
2. 
   
3. open(FILE1, "a") or die;
   
4. open(FILE2, "b") or die;
   
5. 
   
6. my %hash;
   
7. 
   
8. while (<FILE2>) {
   
9.         @_ = split;
   
10.         $hash{$_[0]} = $_[1];
    
11. }
    
12. 
    
13. while (<FILE1>) {
    
14.         @_ = split /,/;
    
15.         $_[0] = $hash{$_[0]} if $hash{$_[0]};
    
16.         print join ',', @_;
    
17. }

复制代码

yestreenstars

回复 15# zimuyunren
用你打包的那两个文件测试也是能得到结果的啊，而且也很快~

1. [root@localhost ~]# awk -F '[, ]+' -vOFS=',' 'NR==FNR{a[$1]=$2;next}{if(a[$1])$1=a[$1]}1' bieming.list.bak user.list.bak | wc -l
   
2. 3567
   
3. [root@localhost ~]# wc -l user.list.bak
   
4. 3567 user.list.bak
   
5. [root@localhost ~]#

复制代码

zimuyunren

谢谢 好使回复 16# yestreenstars


   

zimuyunren

我试了，内容没有替换回复 17# yestreenstars


   

yestreenstars

回复 19# zimuyunren
确实如此~