如何获取我执行的perl脚本的绝对路径?

use*_*116 3 perl

我想获得我执行的perl脚本的绝对路径,例如

我当前的工作目录是/ home/Program/A/B,并且/home/Program/A/sort.pl中有一个perl脚本

当我在/ home/Program/A/B目录下输入perl时../sort.pl,我希望得到

绝对路径sort.pl是/home/Program/A/sort.pl

我的意思是无论我当前的工作目录是什么,我想获得perl的绝对路径

脚本是,如何实现?

谢谢

tch*_*ist 6

这是你想要的:

use FindBin qw($RealScript);
Run Code Online (Sandbox Code Playgroud)

这为您提供了修复所有符号链接的完整路径.