Indeed, thanks for posting; I have now modified Perl 6 to fix this problem today--it no longer returns the last expression evaluated, but the value of the last statement in the block. Happily, fixing this (and a few other things) also makes list comprehensions a lot easier to write now. | [reply] |
$t += $_ for @list;
to return the last value of $t. Okay, okay, I know in Perl 6 there will be other ways to do similar stuff, in particular functional-language like ones that will avoid the need for a temporary variable altogether, but I still wonder how this kind of situation will be handled... | [reply]
[d/l]
[select] |
[+] @list
to sum up the values. As for what your snippet would actually return in Perl 6, with the new rules I'd expect it to return the list of intermediate values, much as if you'd used a "triangular reduce":
[\+] @list
But generally if you're in that situation you'd be using the temporary value later anyway, which tends to put the for loop into void context, so it knows it can just throw away all those intermediate values. And arguably if you're using something as subtle as returning the last value of a for loop, you should have at least a return $t after it for clarity, which would also put the loop into void context. I think this approach will turn out more intuitive in the long run, though of course over the short term it runs a bit counter to Perl 5 intuitions. These days when we try to balance the needs of the present with the needs of the future, we tend to put a thumb on the scale in favor of the future. :-) | [reply]
[d/l]
[select] |