perl - 将环境变量导入 Perl

Question

我不确定“导入”这个词是否合适。我是 Perl 和 Bash 的初学者。我在 Bash 上设置了一个变量，所以当我这样做时:

echo $PRDIR

它打印一个字符串(这是一个目录名)

我想将该字符串导入 Perl，但我不知道该怎么做。我试过:

$varex = system("$PRDIR");
print "$varex";

还有

$varex = system("echo $PRDIR");
print "$varex";

但这行不通(我理解最后一个，它打印“0”因为那是 echo 的返回值)。我也尝试过将 stdout 重定向到一个变量，但我做不到。

Answer 1

如果您希望 Bash 将变量导出到环境中以便程序可以访问它，您可以使用 export 内置函数:

export PRDIR

在 Perl 中，您可以使用 %ENV 哈希访问它:

my $varex = $ENV{"PRDIR"};
print "\$varex is: $varex\n";