$^X
- это то, на что обычно смотрят
$ perl -E'say $^X;'
/home/ikegami/usr/perlbrew/perls/5.14.2t/bin/perl
К сожалению, в некоторых системах он не содержит абсолютного пути.(Я не знаю почему. Может быть, это потому, что точная информация недоступна в этих системах?) Probe :: Perl find_perl_interpreter
усердно работает, чтобы найти абсолютный путь, если $^X
нетсодержит абсолютный путь.
$ perl -MProbe::Perl -E'say Probe::Perl->find_perl_interpreter();'
/home/ikegami/usr/perlbrew/perls/5.14.2t/bin/perl