http://www.perlmonks.org?node_id=575515


in reply to How to determine the path to the Perl binary that executed your program?

On Linux the following should and indeed seems to work:
print readlink("/proc/$$/exe"),"\n";
Probably won't work on any other OS though...