“=)”附近的 PERL 语法错误

Question

我找到了这个example，但我收到了这个错误：

./test.pl 第 11 行的语法错误，靠近 "=)" 执行 ./test.pl 由于编译错误而中止。

第 11 行：while($line = ) {

Answer 1

脚本的作者没有准备将脚本包含在 HTML 中。实际代码是

while ($line = <INFILE>) {

详情请见readline。