如何在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 { }