Как рассчитать хеш модуля

Question

У меня Perl 6 установлен в ~/.rakudo-star/rakudo-star-2018.04, используя LoneStar. когда zef устанавливает модуль, он устанавливается в подкаталог каталога Rakudo Perl 6. Здесь находится каталог с именем perl6/site/resources, который, кажется, содержит все установленные файлы. Как я могу выяснить, какой модуль содержится в каком файле, используя Perl 6?

Answer 1

Если я правильно помню, ты не должен. Это тот, кто должен позаботиться об этом. Но если вам необходимо, используйте подписи SHA1 в каталоге с zef locate

zef --sha1 locate 5417D0588AE3C30CF7F84DA87D27D4521713522A

будет выводить (в моей системе)

===> From Distribution: zef:ver<0.4.4>:auth<github:ugexe>:api<>
lib/Zef/Service/Shell/PowerShell/download.pm6 => /home/jmerelo/.rakudobrew/moar-2018.06/install/share/perl6/site/sources/5417D0588AE3C30CF7F84DA87D27D4521713522A

Из вашего вопроса не слишком ясно, если вы хотите сделать наоборот, то есть выяснить, какой файл SHA1 соответствует какому файлу; в этом случае попробуйте и к этому:

zef locate bin/lwp-download.pl

который вернется

===> From Distribution: LWP::Simple:ver<0.103>:auth<Cosimo Streppone>:api<>
bin/lwp-download.pl => /home/jmerelo/.rakudobrew/moar-2018.06/install/share/perl6/site/resources/059BD7DBF74D1598B0ACDB48574CC351A3AD16BC

Answer 2

Если вы хотите получить источник загружаемого пространства имен, вы можете сделать:

my $module-name = 'Test';

# Get a Distribution object which provides an IO interface to its contents
my $compunit         = $*REPO.resolve(CompUnit::DependencySpecification.new(:short-name{$module-name}));
my $distribution     = $compunit.distribution;
my $handle-from-name = $distribution.content($distribution.meta<provides>{$module-name}.keys[0]).open;
say $handle-from-name.slurp(:close);

# Or if we already know the name-path:
my $handle-from-path = $distribution.content("lib/Test.pm6").open;
say $handle-from-path.slurp(:close);

Обратите внимание, что $compunit.distribution будет работать только в том случае, если разрешение вернуло CompUnit из CompUnit::Repository::Installation репозиторий.

rakudo @ 1812 - это структура для дальнейшего улучшения, позволяющая запрашивать отдельные репозитории ($*REPO.resolve повторяет связанный список репозиториев для получения результата) и унифицирует поведение для разрешения / кандидатов / и т.д. между CompUnit::Repository::Installation а также CompUnit::Repository::FileSystem,