chdir一个问题

nfwolf

UID: 30586
帖子: 30
积分: 69
在线时间: 1 小时

1^# nfwolf 发表于 2008-04-11 16:30

chdir一个问题

print $Bin;
#$dir =~ s/\//\\/g;
$dir ='D:\Elastos21';
#print $DEL[0];
chdir ('$dir') || die "ERROR:CHDIR FAIELD";

想从当前工作目录到'D:\Elastos21'，为什么总是失败呢？

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

2^# cobrawgl 发表于 2008-04-11 16:35

你加上个 $! 看看哪里出错了啊

churchmice

UID: 31829
帖子: 2
积分: 4
在线时间: 10 分钟

3^# churchmice 发表于 2008-04-11 16:35

'$dir' ===> $dir
win下没有怎么写过perl的程序

nfwolf

UID: 30586
帖子: 30
积分: 69
在线时间: 1 小时

4^# nfwolf 发表于 2008-04-11 16:37

不行，还是失败！

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

5^# cobrawgl 发表于 2008-04-11 16:38

QUOTE:

原帖由 churchmice 于 2008-4-11 16:35 发表
'$dir' ===> $dir
win下没有怎么写过perl的程序

对对，应该是 chdir($dir) 不用加上 ' ' 。

nfwolf

UID: 30586
帖子: 30
积分: 69
在线时间: 1 小时

6^# nfwolf 发表于 2008-04-11 16:51

早试了，不行

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

7^# cobrawgl 发表于 2008-04-11 16:53

你改成这样

chdir ($dir) || die "ERROR: $!\n";

然后再把错误信息发出来看看

nfwolf

UID: 30586
帖子: 30
积分: 69
在线时间: 1 小时

8^# nfwolf 发表于 2008-04-11 16:54

No such file or directory at test.pl line 26
实际上是存在D:\Elastos21这个文件夹的

nfwolf

UID: 30586
帖子: 30
积分: 69
在线时间: 1 小时

9^# nfwolf 发表于 2008-04-11 16:57

QUOTE:

原帖由 churchmice 于 2008-4-11 16:35 发表
'$dir' ===> $dir
win下没有怎么写过perl的程序

这样写，程序都没有反应

cobrawgl

UID: 21059
帖子: 1
积分: 2
在线时间: 10 分钟

10^# cobrawgl 发表于 2008-04-11 17:02

QUOTE:

原帖由 nfwolf 于 2008-4-11 16:54 发表
No such file or directory at test.pl line 26
实际上是存在D:\Elastos21这个文件夹的

你确认吗？那就不知道哪里的问题了。

我刚才试了一下，没问题啊

my $dir = 'd:\ebooks';

chdir $dir or die "error: $!\n";

print "$dir change ok!\n";

-------------------

>perl -w test.pl
d:\ebooks change ok!
>Exit code: 0