在Perl中查找相對路徑

Question

我在perl模塊中有以下代碼，

package Foo;
our $pathToScript = "/home/Lucas/project841/python_script.py";

同一文件目錄中的其他模塊經常通過以下方式調用它

$output = `$Foo::pathToScript`;
# etc

我想刪除實際路徑的硬編碼，並使用相對路徑，例如。 ./python_script.py從其他模塊調用腳本。

理想的方法是什么？

Answer 1

您說過，“經常”從Python腳本所在的目錄中調用Perl腳本，而不是“始終”調用。 如果刪除絕對路徑，則需要將其“經常”更改為“始終”，只需將$pathToScript更改$pathToScript Python腳本名稱（無路徑）。

您還可以考慮設置環境PATH（在Perl腳本中），以便始終找到Python腳本（在$pathToScript沒有完整路徑），無論用戶從何處運行或Perl腳本位於何處。