为数组分配由＆lt;分隔的子字符串。 ＆GT;

Question

是否可以为数组分配由< >分隔的文本块的部分。例如，

sometexthere <email@email.com> more text
more text moretext <another@email.com>

应该产生

@array = qw(email@email.com another@email.com);

我该如何做到这一点？

Answer 1

my @array = $text =~ /<([^<>]+)>/g;