获取当前进程的perl可执行文件的绝对路径

前端之家收集整理的这篇文章主要介绍了获取当前进程的perl可执行文件的绝对路径前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
有没有办法获得当前进程的Perl可执行文件绝对路径

$^ X将为我提供Perl可执行文件名,但是文档声明它有时会是一个相对路径,例如在OS X上这似乎是正确的.

ExtUtils :: MakeMaker似乎有一些魔法可以找到绝对路径,因为它在我的OS X上生成的Makefile包含

PERL = /usr/local/bin/perl
FULLPERL = /usr/local/bin/perl

但是我不知道它是如何做到的,或者其他人是否可以轻易获得魔法.

编辑:感谢Borodin提供的$Config {perlpath}提示.在ExtUtils中对此进行了解释,我在ExtUtils :: MM_Unix :: _ fixin_replace_shebang中找到了这个小窍门,我猜这是MakeMaker使用正确的shebang代替#!perl的内容.

    if ( $Config{startperl} =~ m,^\#!.*/perl,) {
        $interpreter = $Config{startperl};
        $interpreter =~ s,^\#!,;
    }
    else {
        $interpreter = $Config{perlpath};
    }

解决方法

我想你要找的是$Config {perlpath}.

如果您希望代码非常便携,则可能需要将文件类型附加到该值;这在perlport文档中有所描述.否则所有你需要的是:

use Config;
my $perl = $Config{perlpath};
原文链接:https://www.f2er.com/Perl/172830.html

猜你在找的Perl相关文章