作者jacky1989 ()
看板Perl
标题[问题] 使用程式来设定系统变数
时间Tue Jun 13 00:15:08 2017
我想要写一只程式是用於自动export
我这样写
FILE: .env_val
server10:20
---------------------------------------
open(FID,"<.env_val");
while(<FID>){
$var="export DISPLAY=$_";
system $var;
}
我也试过这样写
$ENV{'DISPLAY'}=$_;
可是呢，每次执行时
系统变数都变成
server10:0
想问，怎麽会这样子呢?
我是新手，再麻烦各位高手讲解一下，感谢
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 61.231.50.147
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Perl/M.1497284111.A.CAA.html
※ 编辑: jacky1989 (61.231.50.147), 06/13/2017 00:17:52
1F：→ flu: 比方说这样子执行个one liner ，子程式中的env就设定好了 06/13 00:29
2F：→ flu: >perl -we '$ENV{"hello"} = "world" ; system "xterm" ' 06/13 00:29
3F：→ flu: 要改变目前proc的env, 可以用perl即时产生shell script的内容 06/13 00:41
4F：→ flu: 再source它 06/13 00:41