文章详情

  • 游戏榜单
  • 软件榜单
关闭导航
热搜榜
热门下载
热门标签
php爱好者> php文档>去掉数组中重复的行[perl]

去掉数组中重复的行[perl]

时间:2006-10-24  来源:yecheng_110

#注: 来自http://bbs.chinaunix.net的帖子,写在这里备忘。

#!/usr/bin/perl


use strict;

my %hash;
my @array = (1..10,5,20,2,3,4,5,5);
#grep 保存符合条件的元素
@array = grep { ++$hash{$_} < 2 } @array;

print join(" ",@array);
print "\n";

相关阅读 更多 +
排行榜 更多 +
全民格斗王-街霸

全民格斗王-街霸

动作格斗 下载
吐司壁纸

吐司壁纸

主题美化 下载
雷姆从零开始的异世界生活

雷姆从零开始的异世界生活

休闲益智 下载