Windows10下Perl脚本执行cd /D命令报sh类错误问题咨询

原因分析 #

在Windows 10环境下，Perl的system()函数默认会调用类Unix的shell（如Git Bash、Cygwin的sh）来解析执行命令字符串，而非Windows原生的cmd.exe。cd /D是cmd特有的参数，用于同时切换驱动器和目录，但sh会将/D识别为一个路径，导致找不到对应目录，从而抛出sh: line 0: cd: /D: No such file or directory错误。

解决方法 #

1. 显式调用cmd.exe执行命令 #

将命令包裹在cmd /c后，强制使用Windows原生命令行解释器执行：

system('cmd /c "cd /D R:/some_path && echo Directory changed successfully"');

注意：如果命令中包含特殊字符，需要正确处理双引号的转义。

2. 使用Perl内置的chdir()函数 #

切换目录无需依赖外部shell，直接使用Perl原生的chdir()函数，更高效且跨平台：

chdir('R:/some_path') or die "Failed to change directory: $!";

如果切换失败，die会输出具体错误信息，便于排查问题。

3. 修改Perl默认shell为cmd.exe #

在脚本开头设置环境变量PERL5SHELL，让Perl默认使用cmd.exe执行system()命令：

$ENV{PERL5SHELL} = 'cmd.exe /c';
# 之后直接调用system即可
system('cd /D R:/some_path');

内容的提问来源于stack exchange，提问作者Vahag Chakhoyan