Функция Perl Core, такая как File :: Which

Question

Мне интересно, есть ли функция / модуль ядра Perl, которая реализует что-то вроде File :: Which (https://metacpan.org/pod/File::Which) при использовании ядра Perl без установки какой-либо внешней библиотеки.

например, если я хочу проверить исполняемый файл на Perl

my @paths =, где 'perl' -> вернет все возможности perl

что может быть полезно проверить, установлена ​​ли библиотека в системе с Perl?

например python3 предлагает такую ​​функцию на ядре: https://docs.python.org/dev/library/shutil.html#shutil.which

Есть ли в Perl такая функция на ядре и не нужно устанавливать какую-либо библиотеку, или я что-то упустил?

Answer 1

Я нашел ответ can_run из этого основного модуля IPC :: CMD, который может выполнять вышеуказанную работу

https://metacpan.org/pod/IPC::Cmd#$path-=-can_run(-PROGRAM-)

use IPC::Cmd qw(can_run);

my $full_path = can_run('perl') or warn 'perl is not installed!';