我完全懂你的问题——Win32::Env的SetEnv默认确实只在当前Perl进程的上下文里临时生效，说白了就是“半永久”，新打开的cmd窗口或者其他exe程序根本读不到这个变量。要让环境变量真正永久生效，得直接修改Windows注册表，并且通知系统刷新环境变量缓存，这样外部程序才能获取到新值。

这里有两种靠谱的实现方式，看你需求选：

方式1：用Win32::Env本身的持久化参数 #

其实你用的Win32::Env模块本身就支持永久设置，只是没用到第四个可选参数！SetEnv的第四个参数$persist设为1时，就会把变量写入注册表，实现永久生效：

use Win32::Env;
use Win32::API;

# 设置用户级永久环境变量（第四个参数1表示持久化）
SetEnv(ENV_USER, 'AUTO_EXCEL_EXPORT', 'TRUE', 1);

# 关键步骤：发送系统消息刷新环境变量缓存
# 不发这个消息的话，新启动的程序还是读不到新变量
Win32::API->Import('user32.dll', 'BOOL SendMessageTimeoutA(HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam, UINT fuFlags, UINT uTimeout, PDWORD_PTR lpdwResult)');
my $HWND_BROADCAST = 0xffff;
my $WM_SETTINGCHANGE = 0x001A;
SendMessageTimeoutA($HWND_BROADCAST, $WM_SETTINGCHANGE, 0, 'Environment', 2, 5000, 0);

方式2：直接用Win32::TieRegistry操作注册表 #

如果你需要更底层的控制（比如系统级环境变量），可以用Win32::TieRegistry直接修改注册表项，这是最直接的永久设置方式：

用户级环境变量（无需管理员权限） #

use Win32::TieRegistry (Delimiter => '/');
use Win32::API;

# 定位到用户环境变量的注册表路径
my $user_env = $Registry->{'HKEY_CURRENT_USER/Environment/'};

# 写入永久环境变量
$user_env->{'AUTO_EXCEL_EXPORT'} = 'TRUE';

# 发送刷新消息
Win32::API->Import('user32.dll', 'BOOL SendMessageTimeoutA(HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam, UINT fuFlags, UINT uTimeout, PDWORD_PTR lpdwResult)');
my $HWND_BROADCAST = 0xffff;
my $WM_SETTINGCHANGE = 0x001A;
SendMessageTimeoutA($HWND_BROADCAST, $WM_SETTINGCHANGE, 0, 'Environment', 2, 5000, 0);

系统级环境变量（需要管理员权限） #

如果要设置所有用户都能读到的系统级变量，需要以管理员身份运行脚本，代码如下：

use Win32::TieRegistry (Delimiter => '/', Access => Win32::TieRegistry::KEY_WRITE());
use Win32::API;

# 定位到系统环境变量的注册表路径（需管理员权限）
my $system_env = $Registry->{'HKEY_LOCAL_MACHINE/SYSTEM/CurrentControlSet/Control/Session Manager/Environment/'};

# 写入系统级永久环境变量
$system_env->{'AUTO_EXCEL_EXPORT'} = 'TRUE';

# 发送刷新消息
Win32::API->Import('user32.dll', 'BOOL SendMessageTimeoutA(HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam, UINT fuFlags, UINT uTimeout, PDWORD_PTR lpdwResult)');
my $HWND_BROADCAST = 0xffff;
my $WM_SETTINGCHANGE = 0x001A;
SendMessageTimeoutA($HWND_BROADCAST, $WM_SETTINGCHANGE, 0, 'Environment', 2, 5000, 0);

重要注意事项 #

• 不管用哪种方式，发送WM_SETTINGCHANGE消息都是必须的——Windows不会自动检测注册表的环境变量变化，只有收到这个消息，新启动的程序（包括cmd窗口）才能读到新的变量值。
• 已经在运行的程序不会自动更新环境变量，只有新启动的程序才能获取到新值。
• 系统级环境变量必须以管理员身份运行脚本，否则会出现权限不足的错误。

内容的提问来源于stack exchange，提问作者Amarendhiran Amar