在perl程序中设置路径

Question

我有一个bluehost服务器设置,我试图在我的perl程序中设置路径

 print "Content-type: text/html\n\n";
    my $output=`export PATH=\${PATH}:/usr/local/jdk/bin`;
    my output1=`echo \$PATH`;
    print $output1;

然而,它只打印原始的$ PATH./ usr/local/jdk没有添加.谁能告诉我我做错了什么？

Answer 1

您正在创建一个shell,执行一个shell命令,在shell中设置一个环境变量,然后退出shell而不对环境变量做任何事情.你永远不会改变perl环境.那将是使用

local $ENV{PATH} = "$ENV{PATH}:/usr/local/jdk/bin";

但是有点奇怪的是添加到路径的末尾.