## testing '==>>' feed operator

my @x = 1..5; my @y; my @z;

say @x; # [1 2 3 4 5]

@x ==> map {$_ * 2} ==> @y;
say @y; # [2 4 6 8 10]

@x ==>> @y
==> @z;
## ERROR: "'==>>' feed operator not yet implemented. Sorry."
## Output should be [1 2 3 4 5 2 4 6 8 10], according to
## en.wikibooks.org/wiki/Perl_6_Programming/Lazy_Lists_and_Feeds#Feeds