PERL 中用于电子邮件验证的正确正则表达式是什么？

Question

可能的重复：
验证电子邮件地址的最佳正则表达式是什么？< /a>

我是 stackOverflow 的新用户。我有一个与 PERL 中的正则表达式相关的查询。我想知道电子​​邮件的正确正则表达式。下面还给出了创建正则表达式的示例。

例如， [电子邮件受保护] 或 [电子邮件受保护]

Answer 1

电子邮件验证确实是一项复杂的任务，因此我建议使用以下代码：

  use Email::Valid;
  print (Email::Valid->address('[email protected]') ? 'yes' : 'no');