How to count the Number of Occurrences of Specified Element in the Array in Perl - Step by Step Examples

How to count the Number of Occurrences of Specified Element in the Array in Perl ?

Answer

To count the number of occurrences of a specified element in an array in Perl, you can use a loop to iterate through the array and count each occurrence.

✐ Examples

1 Count Occurrences of Element 30 in Integer Array using loop

In this example,

We create an array named @numbers with values 10, 20, 30, 40, 30, 50.
We initialize a counter variable $count to 0 to store the count of occurrences.
We use a loop to iterate through the array and increment $count each time element 30 is found.
After the loop, $count will contain the total count of occurrences of element 30.

Perl Program

@numbers = (10, 20, 30, 40, 30, 50);
$count = 0;
foreach $num (@numbers) {
    if ($num == 30) {
        $count++;
    }
}
print "Number of occurrences of element 30: $count\n";

Output

Number of occurrences of element 30: 2

2 Count Occurrences of Element 'banana' in String Array using loop

In this example,

We create an array named @fruits with values 'apple', 'banana', 'cherry', 'banana'.
We initialize a counter variable $count to 0 to store the count of occurrences.
We use a loop to iterate through the array and increment $count each time element 'banana' is found.
After the loop, $count will contain the total count of occurrences of element 'banana'.

Perl Program

@fruits = ('apple', 'banana', 'cherry', 'banana');
$count = 0;
foreach $fruit (@fruits) {
    if ($fruit eq 'banana') {
        $count++;
    }
}
print "Number of occurrences of element 'banana': $count\n";

Output

Number of occurrences of element 'banana': 2

Summary

In this tutorial, we learned How to count the Number of Occurrences of Specified Element in the Array in Perl language with well detailed examples.

◀ Previous Next ▶