考考大家这两个相似的脚本(关于eof的)有什么不同。

devel

#!/usr/local/bin/perl -w
while ($line = <>) {
print ($line);
if (eof) {
  print ("-- end of current file --\n");
}
}

##########
#!/usr/local/bin/perl -w
while ($line = <>) {
print ($line);
if (eof()) {
print ("-- end of output --\n");
}
}

最后还要解释why?

KornLee

从执行效果来看,也没看出有什么区别~~,不都是读取标准输入/文件的结束时追加一行信息吗~~
:ask

home

最初由 javalee 发表
从执行效果来看,也没看出有什么区别~~,不都是读取标准输入/文件的结束时追加一行信息吗~~
:ask

我也不懂呀。。

georgek

好像是在開啟多個檔案時eof() 才有用, 如果光開啟一個檔案兩者好像沒分別

devel

(小声滴说，我也不懂呀，搞不明白这个函数是干什么的，请教请教:p:p:p)

georgek

eof 是反回當前的, eof()好像也是(不太確定:p), eof(??) 是反回指定的, 當同時要開啟多個檔案時便不用混?y了(用這個比較安心:p)
真要趕緊買書~~~

Glue

perldoc -f eof