regex - 使用 awk 提取所有电子邮件

Question

我正在尝试使用 awk 提取该行的所有电子邮件。这是我尝试过的:

echo " test@test.com secondtest@test.com" | awk 'BEGIN{IGNORECASE = 1}{while(match($0,/[^\s@]+@[^\s@]+\.[a-z]{2,4}/, result) !=0 ) { printf "%s\\n",result[0]; $0 = sub(/[^\s@]+@[^\s@]+\.[a-z]{2,4}/,"", $0)}}'

但是不能正常工作。我期待以下输出:

test@test.com 
secondtest@test.com

Answer 1

在此处使用 OP 的正则表达式并尝试在此处修复 OP 的尝试。我们需要在代码中使用 [[:space:]] 代替 \s 也不需要在这里使用 sub 我们可以使用 for 循环一个一个地遍历所有字段并打印匹配的字段(通过使用使用正则表达式的 if 条件，只要条件满足且正则表达式匹配为 TRUE 则打印该字段，否则什么都不做) .使用 GNU awk 编写和测试。

echo " test@test.com secondtest@test.com" | 
awk '
{
  for(i=1;i<=NF;i++){
     if($i~/[^[:space:]]+@[^[:space:]]+\.[[:alpha:]]{2,4}/){  print $i  }
  }
}'