我想在Perl上修剪字符串中的空格和半冒号和字符

Question

我只想接收一个字符串中的电子邮件。这是我的格式：my $myemail = "EMAIL : test@gmail.com; BMAIL : test@email.net;";

Answer 1

如果认为您要尝试从字符串中解析电子邮件地址并将其存储在数组中。在这种情况下，正如Håkon在评论中提到的那样，您可以使用Email::Address。该模块的提要包括以下示例：

use Email::Address;

my @addresses = Email::Address->parse($line);

这正是您想要的。