摩托學園討論區

由 **kahn** » 週六 9月 30, 2006 7:22 pm

$file1="/cygdrive/c/abc.txt";
open(FILE,"<$file1")||die "Cannot open $ filename\n";
print "$line"while($line=<FILE>);
close (FILE)

這方法可在linux 上work,但xp上為何不行?

由 **wesley.tw** » 週六 9月 30, 2006 9:51 pm

很簡單呀 ~ 因為close (FILE)最後面少了分號呀!!
你應該是在linux下是有加分號吧...但在window上卻忘了!
close (FILE); <--

由 **kahn** » 週六 9月 30, 2006 10:55 pm

應該不是分號的問題,忘了說錯誤訊息是"Cannot open"

由 **wesley.tw** » 週日 10月 01, 2006 12:56 am

我在我的cygwin下去測這隻script是ok的呀!
先touch abc.txt檔再去run這隻scirpt,
我測都很正常的回應出abc.txt的內容!!
這就怪了...

由 **kahn** » 週日 10月 01, 2006 10:28 am

xp 的c:下有 cygwin1.dll 這個檔,但我是不是跟我沒裝cygwin有關

摩托學園討論區

win32 perl

win32 perl

誰在線上