码迷,mamicode.com
首页 > 其他好文 > 详细

Perl 数组 交集,补集,并集

时间:2014-05-26 08:02:22      阅读:269      评论:0      收藏:0      [点我收藏+]

标签:style   c   class   blog   code   java   

bubuko.com,布布扣
my @a=("a","b","c","d","e");
my @b=("b","g","f","e");

my %a=map{$_=>1} @a;
my %b=map{$_=>1} @b;

# 交集
@A = grep( $a{$_}, @b ) ;

# 补集
@B1=grep(!defined $a{$_}, @b);
@B2=grep(!defined $b{$_}, @a);

# 并集 
%C=map {$_=>1} @a,@b;
@C=keys %C;
bubuko.com,布布扣

 

Perl 数组 交集,补集,并集,布布扣,bubuko.com

Perl 数组 交集,补集,并集

标签:style   c   class   blog   code   java   

原文地址:http://www.cnblogs.com/xufeiyang/p/3747628.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!