linux - 谁能解释一下 Shell::Source perl 模块或 Shell::GetEnv 模块的用法

Question

我是 perl 的初学者。我想知道如何使用这个模块。我在某处读到过有关此模块的信息，但没有了解其用法。

实际上，我有一个文件，其中包含一些环境路径，需要在运行某些测试时使用特定工具进行设置(例如文件名是 SET_ENV_TOOL1.csh 或 SET_ENV_TOOL1.sh)。(例如 TOOL1、TOOL2 等)

SET_ENV_TOOL1.sh file conatins:
setenv UVM_HOME /u/tools/digital/uvm/uvm-1.1a
setenv VIPP_HOME /u/tools/digital/vipcat_11.30-s012-22-05-2012
setenv VIP_AXI_PATH ${VIPP_HOME}/vips/amba_axi/vr_axi/sv/ #etc.(almost 10-15 paths are need to be set like this)

每次运行测试时，工具都可能会发生更改，因此还需要设置环境路径来运行该工具。

我必须制作一个 perl 脚本，在运行测试之前设置这些路径。该测试将运行一个命令，并且该命令将使用这些环境路径。

任何帮助将不胜感激。谢谢!!

Answer 1

Reading and changing environment variables is built-in to Perl ，您不需要您提到的模块。

$ENV{UVM_HOME} = '/u/tools/digital/uvm/uvm-1.1a';
$ENV{VIPP_HOME} = '/u/tools/digital/vipcat_11.30-s012-22-05-2012';
$ENV{VIP_AXI_PATH} = "$ENV{VIPP_HOME}/vips/amba_axi/vr_axi/sv/";