如何在Perl 6中控制循环的嵌套?

前端之家收集整理的这篇文章主要介绍了如何在Perl 6中控制循环的嵌套?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
这个程序应该写出三元组总和小于或等于7的三元组:

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

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

解决方法

命名引用的最简单方法

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

猜你在找的Perl相关文章