Perl -- 数组和hash -- 判断元素是否存在数组中
判断元素var是否存在于varlist数组中:#my @varlist = (1,2,3,4);#my $var = 2;my %vars = map { $_ => 1 } @varlist;if(exists($vars{$var})) {...... Logic}往varlist中加入新的非重复元素:$vars($var2)=1;@varlist = k
原创
2013-01-18 09:17:25 ·
7518 阅读 ·
0 评论