小编Li *_* JY的帖子

我想将条件和循环放在 Perl 的同一行上。这就是我想要实现的目标：

foreach (0 .. 10) {
    print $_ if $_ % 2;
}

这应该给我13579。我正在寻找类似Python中的循环理解的语句，例如

[i for i in range(10) if i % 2]

我知道这print $_ foreach 0 .. 10;可行，但问题是将条件添加到语句中......