Select Code to Download

    my sub by_n ($n := $_) { my $k = 0; return -> $x { $x ?? $k += $n 
+:: $k } };
    @list = @list.map( &by_n );

    @list.=map( &by_n );