请教一个关于数组比较的问题。

xixizhihua

大家好，
目前有两个list列表，proto_nouse, pnr_nouse
根据网上的方法，可以通过以下这句，把全集，交集，差集全部整出来。
测试后已经可以用。

但这句本身，我一直理解不清楚，请前辈指点一下，怎么看它内部的意思。
$union{$e}++&&$isect{$e}++;  

eg:
foreach $e(@proto_nouse,@pnr_nouse){  
            $union{$e}++&&$isect{$e}++;  
            }  

            @union=keys %union;  
                  @isect=keys %isect;  
            @diff=grep {$union{$_}==1;} @union;  

xixizhihua

如果是单个++
$union{$e}++还好理解。
两个并行，就彻底蒙了。

xixizhihua

请前辈解答一下吧，谢啦。实在看不明白。

bernana

很简单，&&就是and,如果左边为true则还需要判断右边，如果为false则不判断右边
当第一值进来，++由于并集没有值会返回false,并且值自动补成1,第二次并集有值了遇到为true ，会把交集的值补成1.

523066680

直白一点就是

1. my ( %union, %insect, @union, @isect, @diff );
   
2. my @proto_nouse = (1,3,5,7,9,11);
   
3. my @pnr_nouse = (2,3,5,7,11,13);
   
4. 
   
5. for my $e (@proto_nouse, @pnr_nouse) {
   
6. 
   
7.     #$union{$e}++ && $isect{$e}++;
   
8. 
   
9.     $isect{$e}++ if ( exists $union{$e} );
   
10.     $union{$e}++;
    
11. }  
    
12. 
    
13. @union = keys %union;  
    
14. @isect = keys %isect;  
    
15. @diff  = grep { $union{$_} == 1; } @union;
    
16. 
    
17. printf "%s\n", join(",", @union);
    
18. printf "%s\n", join(",", @isect);
    
19. printf "%s\n", join(",", @diff);

复制代码