Perl grep 函数

• 

  描述

  grep此函数从LIST中提取EXPR为TRUE的任何元素。
• 

  句法

  以下是此函数的简单语法-

  
  grep EXPR, LIST
  

• 

  返回值

  此函数返回在标量上下文中表达式返回true的次数以及在列表上下文中与表达式匹配的元素列表。
• 

  示例

  以下是显示其基本用法的示例代码，它将检查Nagle的算法是否在套接字上打开。但是，在此示例中，您将必须打开一个套接字以提供存储的ID-

   
  @list = (1,"Test", 0, "foo", 20 );
  
  @has_digit = grep ( /\d/, @list );
  
  print "@has_digit\n";
  

  尝试一下

  执行结果：

  
  1 0 20