Chinaunix

标题: perl 如何判断文件是否存在 -e 好像不行啊 [打印本页]

作者: ztj2247 时间: 2011-03-08 23:58
标题: perl 如何判断文件是否存在 -e 好像不行啊
我用
$filename ="/home/abc.txt";

if( -e $filename)
{
print "file exist\n";
}
else
{
print "file no exist\n";
}

好像不行呀

作者: Mr-Summer 时间: 2011-03-09 09:03
{:3_182:} 好像是对的呀

作者: bruce_wang_jane 时间: 2011-03-09 09:29
可能跟版本有关系，我刚在perl 5.12上尝试，-e是有效果的，lz用的是那个版本？

作者: longbow0 时间: 2011-03-09 09:39
确实有

/home/abc.txt

复制代码

这个文件吗？

作者: ajdan4q 时间: 2011-03-09 10:00
可以啊，我的PERL是

This is perl, v5.8.5 built for x86_64-linux-thread-multi

作者: zhlong8 时间: 2011-03-09 10:06
你就把文件直接放到 /home 了

作者: 只爱睡觉 时间: 2011-03-09 10:13

$filename ="/home/abc.txt";
if( -e $filename)
{
print "file exist\n";
}
else
{
print "file no exist\n";
}

复制代码

print "$filename exists";
or
print "$filename not exists";

作者: dahe_1984 时间: 2011-03-09 10:24
cat test.pl
#!perl
use strict;

my $filename ='/home/v-guhe/tmp/abc.txt';

if(-e $filename)
{
print "file $filename exist\n";
}
else
{
print "file $filename no exist\n";
}
BASH-/home/v-guhe/tmp %perl test.pl
file /home/v-guhe/tmp/abc.txt exist
BASH-/home/v-guhe/tmp %

作者: seufy88 时间: 2011-03-09 10:55
LZ你是用什么用户运行这支程序的？有可能这个用户都没有权限进入/home
另外有什么运行报错的没。“不行”到底是什么，具体点嘛

作者: ztj2247 时间: 2011-03-09 12:07
可以用的~ 我看错了

作者: dahe_1984 时间: 2011-03-09 15:11

LZ你是用什么用户运行这支程序的？有可能这个用户都没有权限进入/home
另外有什么运行报错的没。“不行”到 ...
seufy88 发表于 2011-03-09 10:55

不行就是不行，这种隐私问题不要问了

作者: zhlong8 时间: 2011-03-09 15:18

绝对隐私

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)