如何在Perl脚本中切换NVM环境，执行nvm use命令报错如何解决

问题根本原因 #

两个问题的触发原因分别如下：

• 第一个报错Can't exec "nvm": No such file or directory：nvm本质是Shell函数，不是存放在系统PATH路径下的独立可执行二进制文件，Perl的system函数默认会从PATH中查找可执行文件，自然无法识别nvm。
• 第二个写法无效果：你调用bash -lic执行的是独立的子进程，nvm use只会修改这个子Bash进程的环境变量，执行完成后子进程直接退出，对Perl主进程、以及Perl后续启动的其他子进程的环境完全没有影响，所以看起来相当于没有生效。

解决方案 #

方案1：所有依赖对应NVM版本的命令都放在同一个Bash子进程中执行 #

这是最常用、兼容性最高的方案，不需要修改Perl自身环境，把需要用到该Node版本的所有命令和nvm use拼接在一起执行即可：

my $nvm_version = "8.12.0";
# 后续需要执行的npm build等命令都跟在nvm use后面，用&&连接
my $cmd = qq(nvm use $nvm_version && npm run build);
# 检查执行结果，失败直接抛出错误
system("bash", "-lic", $cmd) == 0 or die "执行命令失败：$?";

方案2：将NVM的环境变量导出到Perl主进程 #

如果你需要让Perl后续所有的system/exec调用都默认使用这个Node版本，可以把nvm use修改的环境变量同步到Perl的%ENV全局哈希中：

my $nvm_version = "8.12.0";
# 执行nvm use后导出所有环境变量，Perl读取输出同步到自身环境
my @env_lines = `bash -lic 'nvm use $nvm_version >/dev/null && env'`;
foreach my $line (@env_lines) {
    chomp $line;
    my ($key, $value) = split /=/, $line, 2;
    $ENV{$key} = $value if defined $key && defined $value;
}

# 后续执行node/npm命令都会使用指定的NVM版本
system("node -v") == 0 or die $?;

注意事项 #

• 如果$nvm_version是外部传入的非硬编码值，需要先做转义处理，避免Shell注入风险。
• 部分系统的Bash非交互式加载配置时可能不会自动加载nvm，可以手动指定nvm的加载路径，比如把命令改成source ~/.nvm/nvm.sh && nvm use $nvm_version，兼容更极端的环境。

内容的提问来源于stack exchange，提问作者Derek Megyesi