How to find repeated values in Array List?

Question

In array List

my @array = ('val1','val2','val3','val4','val1');

I would like to get output like below

Output:
No of repetition of Val1 = 2 times

Please help me to get this output.

Thanks in advance!

In Perl, {…} creates a hash reference, not an array – those are initialized using a list (…). You should consider to use strict; use warnings; as a safety net. — amon
– amon, Commented Dec 3, 2013 at 12:25

fugu · Accepted Answer · 2013-12-03 12:23:25Z

2

Use a hash:

my @array = ('val1','val2','val3','val4','val1');    
my %seen;
my $element;
foreach $element (@array){
    $seen{$element}++
}

foreach my $val (keys %seen){
    print "No of repetition of $val = $seen{$val} times\n" if ($seen{$val} > 1);
}

Prints:

No of repetition of val1 = 2 times

edited Dec 3, 2013 at 12:23

answered Dec 3, 2013 at 12:17

fugu

6,6129 gold badges42 silver badges82 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

mpapec · Accepted Answer · 2013-12-03 12:17:14Z

2

my @array = ('val1','val2','val3','val4','val1');

my %seen;
$seen{$_}++ for @array;

print "No of repetition of $_ = $seen{$_} times\n"
  for grep $seen{$_} >1, sort keys %seen;

answered Dec 3, 2013 at 12:17

mpapec

50.7k8 gold badges71 silver badges133 bronze badges

Collectives™ on Stack Overflow

How to find repeated values in Array List?

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related