我想在Perl的同一行上添加一个条件和循环。这就是我想要达到的目标: print $_ if $_ % 2;这应该会给我13579。我在寻找一个类似Python循环理解的语句。[i for i in range(10) if i % 2]
我知道print $_ foreach 0 .. 10;可以工作,但问题是在语句中添加条件.
我试图从一个文件中提取数据到Perl程序中,并使用"foreach“循环在Linux sh终端中执行它,但是每次Perl向sh终端返回值时,它都会在打印下一个字符串之前打印一个新行,这会导致我的脚本失败die("Unable to open file");
@data = <FILE>;
close(FILE);
foreach