这行得通:-
while (<CONF>) {
print $_;
}
但这不是:-
if (<CONF>) {
print $_;
}
并给出有关未初始化值的错误。我在这里想念什么?
最佳答案
while (<CONF>)
被重写为
while (defined($_ = <CONF>))
所以你可能想要
if (defined($_ = <CONF>))
关于perl - perl 中的 "while(<FH>)"和 "if(<FH>)"有什么区别?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/12271744/