chdir 咋不好使

david_95

运行 cmd ,
我当前目录是 c:\software
我想用perl 切换工作目录到 c:/temp
perl -eMcwd "chdir('c:/temp') or die('failed');"

但是还是目录没变，麻烦谁帮忙看看

david_95

我发现执行 chdir return 1; 但是我cmd 当前目录没有变，这是咋回事呢？

zhlong8

每个进程都有自己的cwd，否则就乱套了。你修改的只是 perl 进程的，而它只是启动时从 cmd 的进程继承了这一属性然后就分道扬镳了。

所以 cd 是 cmd.exe 自己识别的命令，不能是个 exe

zhlong8

同样还有环境变量，你不重开 cmd 在属性哪里修改环境变量是没用的

david_95

哦，有道理，谢谢，如果我想用perl ，又想改变当前的cmd 窗口的目录， 应该怎么作呢？

zhlong8

在 perl 里用 system 再开个 cmd 进程

david_95

不清楚 开cmd 怎么开， 加了system("cmd"); 然后运行我的脚本还不行。后来就用windows 自己的batch 命令代替perl 了
我的脚本就是切换不同的目录，作编译
use Cwd;

my $file="mybatch.bat.txt";
open(FILE_1,"<$file");
system("cmd /C");
while(my $line=<FILE_1>){
        print "Command:=".$line."\n";
        if($line=~/cd\s(\w+)/g){
                my $tarDir=($1=~s/\\/\//g);
                print "Tardir = $tarDir\n";
                chdir($1);
                print "CurrentDir:=".cwd()."\n";
        }else{
                system("$line");
        }
       
        print "Done > $line";
}
close FILE_1;


现在我用window 的batch ,执行命令　用 call ， 这样可以了，

华小飞_Perl

perl中的chdir函数不能改变perl运行的工作目录，只能改变perl程序运行中的目录，perl所在的工作目录只能由其所在的shell来完成。