Perl 设置环境变量

Perl中有一个叫做%ENV的环境变量，和其他的HASH散列一样，可以被赋值。

while (my ($key,$value)=each %ENV)
{
       print "$key: $value\n";
}
$ENV{'PATH'}="/opt/usr/bin";

注意：这个方法只能在该进程中有效，当推出该进程时，赋值就不存在了。其他进程都不知道。