如何从数组中删除所有undefs？

Question

在从Perl中的配置文件中读取时,可能存在一行无效且不需要添加到我的有效行数组的情况.由于我在这里使用for循环,即使是无效行也会创建一个undef条目.我怎样才能将它们全部删除？

谢谢!

Answer 1

@array = grep defined, @array;