perl - 如何在 Perl 6 中控制循环的嵌套？

Question

这个程序应该已经编写了总和小于或等于 7 的三元组索引：

for ((1..7) X (1..7)) X (1..7) {
 .say if [+] $_ <= 7;
}

我认为它只会循环遍历列表的顶层（然后代码在循环体中会出现错误，但这不是重点），但它只是循环遍历单个数字，这令人沮丧:(避免它的巧妙技巧？顺便说一句，有没有办法制作 n 元直接产品？

Answer 1

命名参考的最简单方法

for (1..7) X (1..7) -> $a, $b { }