Perl grep()用法及代码示例

Perl中的grep()函数用于从给定的数组中提取任何元素，该元素为给定的正则表达式求值。

用法： grep(Expression, @Array)

参数：

Expression :它是用于在给定数组的每个元素上运行的正则表达式。
@Array：这是在其上调用grep()函数的给定数组。

返回值：给定数组中为给定正则表达式求真值的任何元素。

示例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;

输出：

GeeksGeek

在上面的代码中，正则表达式/^G /用于从给定数组中获取以“ G”开头的元素，并丢弃其余元素。

示例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;

输出：

在上面的代码中，正则表达式/^d /用于从给定数组中获取整数值并丢弃其余元素。

示例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;

输出：

ShyamGeetaSheeta

在上面的代码中，正则表达式！/^R /用于获取不是以'R'开头的元素，并丢弃以'R'开头的元素。

相关用法

注：本文由纯净天空筛选整理自Kanchan_Ray大神的英文原创作品 Perl | grep() Function。非经特殊声明，原始代码版权归原作者所有，本译文未经允许或授权，请勿转载或复制。