紧急求救：如何在PERL中设置Linux的系统变量

slwj

求救：如何在PERL中设置Linux的系统变量，此系统变量名称是LD_LIBRARY_PATH，对所有LINUX的账户都有效，

开始我用
`export  LD_LIBRARY_PATH=./TestLD_LIBRARY_PATH`
，之后设置打印查看，发现并没有改过来

现在的想法是在bashrc的最后添加一行：
export  LD_LIBRARY_PATH=./TestLD_LIBRARY_PATH`
，然后再运行
source ./bashrc
让其生效，请问具体该在PERL中如何实现，多谢各位啦！

MMMIX

回复 1# slwj


    这东西只能在 Shell 的初始化脚本中设置；要对所用用户都生效，那就放在系统级的初始化脚本中。

在 Perl 中设置只能影响当前的进程以及该进程的子进程，连它的父进程（通常为 Shell 进程）都影响不了，更不要说其他用户了。

slwj

现在的想法是使用wc -l统计出bashrc文件行数，然后使用sed命令在文件末尾添加一行，之后再
source bashrc
之后，再logout和login

请问，logout和login部分，用PERL代码如何实现？

q1208c

在 perl中, 所有的 环境变量(系统上带来的)都在 %ENV 里. 你可以先查看一下. 然后根据你的需要, 修改或增加相应的值就可以了. 当你的perl退出以后, 不会影响你原来的系统.

slwj

q1208c 发表于 2014-02-14 08:01
在 perl中, 所有的 环境变量(系统上带来的)都在 %ENV 里. 你可以先查看一下. 然后根据你的需要, 修改或增加 ...

实际试过了的，修改ENV中的起不了作用，因为要不仅仅在当前shell中用它

q1208c

回复 5# slwj

如果你需要在每个shell里使用, 那只能在每个shell里设置了.
   

yun456900

PERL5LIB=${PERL5LIB}:/usr/bin/lib
export PERL5LIB

在.bashrc加上这个肯定可以，我一直这样做的。

junglegq

环境变量的有效区间只能是当前进程及其子进程。所以你的问题只能通过修改shell配置，如果只针对当前用户，修改~/.bashrc， 如果要针对所有用户，修改/etc/bashrc