作者hajimels (阿一)
看板perl
标题Re: [问题] 移除阵列中的重复值
时间Sun Aug 26 19:18:01 2007
※ 引述《dickyhu (轩)》之铭言:
: 请问一下如果一个阵列中,有重覆值那我要怎麽移除呢?
: 例如: @tmp={1,3,5,7,7,9,3,5,9};
: 而我想输出的结果为 1,3,5,7,9 ==>然後得到此阵列的个数为5
: 请教各位大大罗。
: 因为我只找到PHP 有这种函式可以用,但Perl目前没有找到。
use strict;
my $hash=undef;
my @tmp={1,3,5,7,7,9,3,5,9};
foreach(@tmp){$hash->{$_}=undef;}
my @key = keys %$hash;
foreach my $UniElement (@key){print $UniElement,"\n";}
不是把有重覆值的array,做为一个hash的key,就好了吗?@@
--
★ミ ζ
○_.
/(╯
【今晚的天空有一颗流星划过 在预言着什麽】|>
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 163.25.118.134
※ 编辑: hajimels 来自: 163.25.118.134 (08/26 19:19)