如何調用此Perl腳本？

Question

我想知道在Linux Perl腳本中是從cmd行還是從bash腳本調用了它。 任何想法？

Answer 1

您可以調用linux命令'id'並將輸出重定向到日志文件，這樣您將始終知道是誰調用了該腳本。

Answer 2

您可以使用getppid標識Perl腳本的父進程的進程getppid 。 然后，您可以解析ps輸出或檢查/proc/<parent-pid>虛擬文件系統以標識父級。

---

更新 ：針對您的特定問題，如果您的Perl腳本被某個bash腳本調用，則希望它做一些特殊的事情，在腳本中設置特殊的環境變量可能會更容易。 例如：

# special bash script
export SPECIAL=1
perl my_script.pl



# my_script.pl
...
do_something();
if ($ENV{SPECIAL}) {
    print "Called from the special bash script\n";
    send_email();
} else {
    print "Not called from special bash script\n";
}