How to check if Specified Element is present in the Array in Perl - Step by Step Examples
How to check if Specified Element is present in the Array in Perl ?
Answer
To check if a specified element is present in an array in Perl, you can use methods like grep
or a loop to iterate through the array and check each element.
✐ Examples
1 Check if Element 30 is present in Integer Array using grep
In this example,
- We create an integer array named
@numbers
with values 10, 20, 30, 40, 50. - We use the
grep
function to check if element 30 is present in the array. - The
grep
function returns a list of elements that match the condition, which we check for emptiness to determine if the element is present.
Perl Program
@numbers = (10, 20, 30, 40, 50);
element = 30;
@found_elements = grep { $_ == $element } @numbers;
$is_present = @found_elements ? 'true' : 'false';
print "Element 30 is present: $is_present\n";
Output
Element 30 is present: true
2 Check if Element 'banana' is present in String Array using loop
In this example,
- We create a string array named
@fruits
with values 'apple', 'banana', 'cherry'. - We use a
foreach
loop to iterate through the array and check each element with the specified element 'banana'. - If the element is found, we set a boolean variable
$found
to true; otherwise, it remains false.
Perl Program
@fruits = ('apple', 'banana', 'cherry');
element = 'banana';
$found = 0;
foreach $fruit (@fruits) {
if ($fruit eq $element) {
$found = 1;
last;
}
}
$is_present = $found ? 'true' : 'false';
print "Element 'banana' is present: $is_present\n";
Output
Element 'banana' is present: true
Summary
In this tutorial, we learned How to check if Specified Element is present in the Array in Perl language with well detailed examples.
More Perl Arrays Tutorials
- How to Declare an Array in Perl ?
- How to Initialize an Array in Perl ?
- How to Access Array Elements in Perl ?
- How to Access Array Elements using Index in Perl ?
- How to get First Element in Array in Perl ?
- How to get Last Element in Array in Perl ?
- How to check if an Array is Empty in Perl ?
- How to check if an Array is Not Empty in Perl ?
- How to get Sub Array in Perl ?
- How to Get Array Length in Perl ?
- How to Iterate Over an Array in Perl ?
- How to Iterate Over an Array in Reverse Order in Perl ?
- How to get the Index of Specified Element in an Array in Perl ?
- How to check if Specified Element is present in the Array in Perl ?
- How to count the Number of Occurrences of Specified Element in the Array in Perl ?
- How to Sort an Array in Perl ?
- How to Sort an Array in Ascending Order in Perl ?
- How to Sort an Array in Descending Order in Perl ?
- How to create a Two Dimensional Array in Perl ?
- How to Iterate over a Two Dimensional Array in Perl ?
- How to create a Three Dimensional Array in Perl ?
- How to Copy an Array in Perl ?
- How to Split an Array in Perl ?
- How to Join Arrays in Perl ?
- How to check if Two Arrays are Equal in Perl ?
- How to check if Two Arrays have Same Elements (Regardless of Order) in Perl ?
- How to Convert an Array of Integers to an Array of Strings in Perl ?
- How to Convert an Array of Strings to an Array of Integers in Perl ?
- How to Reverse an Array in Perl ?
- How to Shuffle an Array in Perl ?
- How to Rotate Elements in an Array in Perl ?
- How to Filter Elements of an Array based on a Condition in Perl ?
- How to Declare an Integer Array in Perl ?
- How to Declare a Float Array in Perl ?
- How to Declare a String Array in Perl ?
- How to Remove Duplicates in an Array in Perl ?
- How to Remove Specific Element from an Array in Perl ?
- How to Remove Element from Array based on a Condition in Perl ?
- How to Sort a String Array in Dictionary Order in Perl ?
- How to Concatenate Strings in Array in Perl ?