是否可以将Feed与延迟列表一起使用？

Question

这有效：

bastille% perl6 -e 'my @squares = (1...*).map({ $_ ** 2 }); say @squares[0..^10].join: ", "'
1, 4, 9, 16, 25, 36, 49, 64, 81, 100

但这不是：

bastille% perl6 -e 'my @squares <== map { $_ ** 2 } <== 1...*; say @squares[0..^10].join: ", "'
Cannot push a lazy list onto a Array
  in block <unit> at -e line 1

为什么会抛出？有没有一种方法可以将延迟列表与摘要一起使用？

Answer 1

提要运算符<==将元素追加到数组。

my @s <== ^3; 
@s <== <a>..<c>; 
say @s

[0 1 2 a b c]

所以

my @squares <== map { $_ ** 2 } <== 1...*;

与

类似

my @squares.append: map  * ** 2, 1..*;

您可以将项目赋值运算符 =和方括号一起使用

my @squares = ( map { $_ ** 2 } <== 1..* );

或下一个小技巧

[=] my @squares <== map { $_ ** 2 } <== 1..*;