Perl去除一个数组中的重复元素

Perl去除一个数组中的重复元素
my @array = ( 'a', 'b', 'c', 'a', 'd', 1, 2, 5, 1, 5 ); 
my %saw; 
@saw{ @array } = ( ); 
my @uniq_array = sort keys %saw;

#@array 是要去重复的数组,@uniq_array是去重复后的数组
  • 发表于 2018-05-09 16:32
  • 阅读 ( 2716 )
  • 分类:perl

你可能感兴趣的文章

相关问题

0 条评论

请先 登录 后评论
安生水
安生水

347 篇文章

作家榜 »

  1. omicsgene 698 文章
  2. 安生水 347 文章
  3. Daitoue 167 文章
  4. 生物女学霸 120 文章
  5. xun 82 文章
  6. 红橙子 78 文章
  7. rzx 74 文章
  8. CORNERSTONE 72 文章