用perl修改系统环境变量，没有立即生效[讨论]

用perl修改系统环境变量，没有立即生效[讨论]
1 碰到的问题如题目所述，我用下面的代码来修改注册表环境变量的：
use Win32::Registry;
my $main;
my $Software;
my $ActiveState;
$main::HKEY_LOCAL_MACHINE->Open("SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment", $Software);
$Software->SetValueEx("CLEARCASE_PRIMARY_GROUP", 0, REG_SZ, $toGroup);
执行完代码，新环境变量确实是加上去了，但是在程序里面却没有生效；而当我打开系统环境变量的窗口，点击确定后，在一次的执行程序，新增加的环境变量才生效。
请文有没有人知道该怎么让修改完的环境变量立刻生效？非常感谢！

谢谢anthony.--但是我是.
谢谢anthony.
但是我是新手，手头上资料也不是很多，看了你那段代码，不知道该在哪里赋值，创建新的环境变量项，你能不能把代码写全，谢谢了:)

http://search.cpan.org/d.
http://search.cpan.org/dist/Win32-TieRegistry/TieRegistry.pm