为什么-e $file会判断失败呢？

nfwolf

程序如下，目的是判断取出out.txt中一行内容所指向的文件是否存在
#!perl

my @fist;

open(FREAD, "out.txt") || die "打开文件失败$!";
while(<FREAD>){
   if(!(-e $_)){
        print $_;
        @fist = (@fist, $_);
    }
}
close(FREAD);

open(FWRITE, ">diffout.txt") || die "写文件失败$!";
print  FWRITE @fist, ;
close FWRITE;

out.txt中的内容如下：
G:/Layout/android layout/webarchive/archive-empty-frame-dom-real.out
G:/Layout/android layout/webarchive/archive-empty-frame-source-real.out
G:/Layout/android layout/webarchive/archive-with-unencoded-url-real.out
G:/Layout/android layout/webarchive/test-body-background-real.out
G:/Layout/android layout/webarchive/test-duplicate-resources-real.out

这些文件都存在，
结果print $_;发现提示全部不存在

Perl_Er

chomp

nfwolf

非常感谢，虽然还没有测试过，但大致就是楼上所说的，哎！真是粗心啊