在Perl中,可以通過使用 %ENV 哈希來訪問和修改環境變量。以下是一些示例代碼:
my $path = $ENV{'PATH'};
print "PATH: $path\n";
$ENV{'MY_VARIABLE'} = 'value';
if (exists $ENV{'MY_VARIABLE'}) {
print "MY_VARIABLE exists\n";
} else {
print "MY_VARIABLE does not exist\n";
}
delete $ENV{'MY_VARIABLE'};
需要注意的是,在修改環境變量時,會影響整個Perl腳本的環