从数组中删除空白元素

Question

在我的Perl代码中,我正在访问一封电子邮件.我需要在其中获取表并将其解析为数组.我用它做了:

my @plain = split(/\n/,$plaintext);

但是,有很多空白元素@plain.它有572个元素,其中大约一半是空的.

我在这里做错了吗？我需要在代码中添加/更改哪些内容才能删除空白元素？

Answer 1

grep 输出,因此您只能获得包含非空白字符的条目.

my @plain = grep { /\S/ } split(/\n/,$plaintext);