[問題] 使用程式來設定系統變數

[jacky1989 ()]

我想要寫一隻程式是用於自動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://www.ptt.cc/bbs/Perl/M.1497284111.A.CAA.html
※ 編輯: jacky1989 (61.231.50.147), 06/13/2017 00:17:52
→ flu: 比方說這樣子執行個one liner ，子程式中的env就設定好了
→ flu: >perl -we '$ENV{"hello"} = "world" ; system "xterm" '
→ flu: 要改變目前proc的env, 可以用perl即時產生shell script的內容
→ flu: 再source它