Perl更改調用者的工作目錄

Question

我想編寫一個perl腳本，將其工作目錄更改爲其他位置，執行某些操作，然後在我從shell調用該目錄後將該目錄留在該目錄中。 chdir只做第一部分。如何更改呼叫者的工作目錄？

Answer 1

你想做什麼是不可能的。最接近的做法是編寫一些bash，然後在調用shell中發送它，而不是運行它。軟件不能影響調用它的shell。

Answer 2

你可以做followng模擬效果：

1. 打電話給你的腳本EXEC
2. 在你的腳本，而不是退出，exec的一個新的外殼。

Answer 3

將您的perl腳本包裝在shell腳本中，在執行perl腳本之前從bash腳本中更改目錄並獲取腳本。

所以不是一個Perl腳本，如：

#!/usr/bin/perl 
# my_program.pl ... 
chdir "/my/directory"; 
... 

使用，比方說，一個bash腳本，如：

#!/usr/bin/bash 
cd /my/directory 
perl my_program.pl "$@" 

和來源，當你把它叫做腳本，即

$ source my_bash.sh 

或

$ . my_bash.sh 

（現在你可以使用的定界符，並把它所有到一個腳本：

#!/usr/bin/bash 
cd /my/directory 
perl <<EOF 
... include your perl script here ... 
EOF 

但我不認爲你可以使用@ARGV變量）

Answer 4

這是可能。

但是，你必須打開在讀/寫模式/dev/mem設備之一，在存儲器中找到合適的位置存儲父進程的[dev,ino]對爲其cwd，並用新捅它。

即使你管理，我懷疑你可以在第二天早上看到自己在鏡子裏。我確定知道我永遠不會。 :)儘管如此，我的同事們臉上的神態完全是值得的。我使用這種方法將shell的提示從一個命令更改爲下一個命令。這只是珍貴的。直到我告訴他們我是如何做到的，他們根本弄不明白。

這也不被推薦。 :)