The grep() function in Perl used to extract any element from the given array which evaluates the true value for the given regular expression.
Syntax: grep(Expression, @Array)
Parameters:
- Expression : It is the regular expression which is used to run on each elements of the given array.
- @Array : It is the given array on which grep() function is called.
Returns: any element from the given array which evaluates the true value for the given regular expression.
Example 1:
#!/usr/bin/perl # Initialising an array of some elements @Array = ( 'Geeks' , 'for' , 'Geek' );
# Calling the grep() function @A = grep (/^G/, @Array );
# Printing the required elements of the array print @A ;
|
Output:
GeeksGeek
In the above code, Regular expression /^G/ is used to get the element starting with ‘G’ from the given array and discard the remaining elements. Example 2:
#!/usr/bin/perl # Initialising an array of some elements @Array = ( 'Geeks' , 1, 2, 'Geek' , 3, 'For' );
# Calling the grep() function @A = grep (/\d/, @Array );
# Printing the required elements of the array print @A ;
|
Output :
123
In the above code, Regular expression /^d/ is used to get the integer value from the given array and discard the remaining elements.
Example 3:
#!/usr/bin/perl # Initialising an array of some elements @Array = ( 'Ram' , 'Shyam' , 'Rahim' , 'Geeta' , 'Sheeta' );
# Calling the grep() function @A = grep (!/^R/, @Array );
# Printing the required elements of the array print @A ;
|
Output :
ShyamGeetaSheeta
In the above code, Regular expression !/^R/ is used to get the elements not starting with ‘R’ and discard the elements which start with ‘R’.