check duplicate elements

james94538 · #1 (**permalink**) 3 Weeks Ago

hi
if i have arry with lots of intergers , how to check if there is duplicate integers
in perl ?

say I ahve @intergers=( 1,2,3,3,4,5,4,99,99,100)

durden_tyler · #2 (**permalink**) 3 Weeks Ago

If you just want to check (and maybe list) multiple occurrences, then:

Code:

$
$ perl -le '@x = (1,2,3,3,4,5,4,99,99,4,4,3,3,100); foreach $i (@x){$y{$i}++};
            print "Multiple occurrences are: "; foreach (keys %y){print if $y{$_}>1}'
Multiple occurrences are:
99
4
3
$
$

tyler_durden

summer_cherry · #3 (**permalink**) 3 Weeks Ago

Code:

my @intergers=( 1,2,3,3,4,5,4,99,99,100);
map {$hash{$_}++} @intergers;
print join " -- ", grep {$hash{$_} == 1} keys %hash;

More UNIX and Linux Forum Topics You Might Find Helpful
Thread	Thread Starter	Forum	Replies	Last Post
Help using SED to comment XML elements	J-Hon	Shell Programming and Scripting	4	06-03-2009 02:42 PM
Forrester’s 4 Elements…	iBot	Complex Event Processing RSS News	0	08-12-2008 03:40 PM
just want certail elements	frenchface	Shell Programming and Scripting	1	05-10-2008 10:38 PM
Map - printing all elements - why?	dhanamurthy	High Level Programming	0	04-14-2008 02:19 PM
Check host file for duplicate entries	ThreeDot	Shell Programming and Scripting	4	01-21-2008 07:16 PM

Thread Tools	Search this Thread
Show Printable Version Email this Page	Search this Thread: Advanced Search
Display Modes	Rate This Thread
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode	Rate This Thread:


	Powered by