如何在 perl6 中执行外部命令并捕获其输出？

Question

如何在 Perl6 中执行外部命令并捕获其输出？

Perl5 风格的反引号似乎不起作用：

> my $results = `ls`;
Confused at line 1, near "my $results"

Synopsis 16 记录了运行 方法，但这返回退出状态而不是 stdout 的输出。

我正在使用 Rakudo 实现 (rakudo-star-2010.12)。

Answer 1

请使用 qqx 或 qx，例如：

> my $results = qqx{ls};

Larry Wall 回答邮件列表上的一个等效问题：

[...]

：什么可以替代反引号或 qx{}？

qqx[] 或 qq:x[] 是准确的
相等的。 qx[] 或 q:x[] 将是
与单引号语义相同。
（可能没有反引号
因为我们要保留这个目的`
对于用户定义的东西，并且因为
反引号在视觉上很难
从许多单引号中看出
字体。）

Answer 2

截至 2015 年 1 月：

最近验证的教程页面

最近的 Perl 6 发布页面

最近关于合理化由什么返回什么的讨论

Answer 3

这也可以使用带有 out 参数的 run() 安全地完成（无需接触 shell）：

my $proc = run 'ls', q!/tmp/"This" is an ugly name, isn't it?/!, :out;
my $output = $proc.out.slurp-rest;

更多详细信息请参见 Proc 类。