4

~/.rakudo-star/rakudo-star-2018.04我使用 LoneStar安装了 Perl 6 。安装模块时zef,它会安装到 Rakudo Perl 6 目录的子目录中。这里是一个名为 的目录perl6/site/resources,它似乎包含所有已安装的文件。如何使用 Perl 6 确定哪个模块包含在哪个文件中?

4

2 回答 2

5

如果您想获取将被加载的命名空间的来源,您可以执行以下操作:

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仅当 resolve 从CompUnit::Repository::Installation存储库返回 CompUnit 时才有效。

rakudo@1812是进一步改进这一点的框架,允许查询单个存储库($*REPO.resolve迭代存储库的链接列表以给出结果)并统一解析/候选/等的CompUnit::Repository::Installation行为CompUnit::Repository::FileSystem

于 2018-06-24T23:28:42.110 回答
2

如果我没记错的话,你不应该。zef必须照顾它。但是,如果您确实需要,请使用目录中的 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
于 2018-06-24T07:21:48.520 回答