Re^2: Perl6 Contest #2: P6 That Doesn't Look Like P5

This is nice, except I have one small quibble. You have used map in a void context, with side effects. I usually avoid doing this, as I think it adds nothing over an equivalent for loop, other than obfuscation. So, I'd change:

    when 1  { @loop[0].map:{ yield [$^first] }; yield undef }
[download]

To:

    when 1  { for @loop[0] { yield [$^first] } yield undef }
[download]

Much like similar circumstances in Perl 5, not only is the for loop shorter (update: shorter only due to the semicolon, but shorter nonetheless), I also think it's clearer. The less superfluous syntax we use, the better. :-)

Update: based on the replies, I perhaps should have added a disclaimer. This post is about style and based on my personal preferences. I was not arguing in terms of performance or functionality, merely in terms of style. My personal style preference is to favor alternatives with fewer syntax characters, all else being equal. That's the essence of what I was trying to convey.

Comment on Re^2: Perl6 Contest #2: P6 That Doesn't Look Like P5 Select or Download Code

Replies are listed 'Best First'.
Map in void context by kaif (Friar) on Jun 03, 2005 at 16:52 UTC
Using `map` in void context is a popular topic on Perlmonks, somewhat of a religious war à la Emacs and vi. Some previous discussion of the topic includes is the use of map in a void context deprecated ? (42 comments). Remember also that Perl 5.8.1 contained an optimization for map in a void context. I believe the conclusion reached was that "we agree to disagree", in the sense that both sides agree not to impose their beliefs on the other side. Recall also Larry's quote on the matter: The argument against using an operator for other than its primary purpose strikes me the same as the old argument that you shouldn't have sex for other than procreational purposes. Sometimes side effects are more enjoyable than the originally intended effect.	[reply] [d/l]
Re^3: Perl6 Contest #2: P6 That Doesn't Look Like P5 by mugwumpjism (Hermit) on Jun 02, 2005 at 22:45 UTC
This isn't as bad as you might think. Because `map` is being used in Void context, we know we can throw away the return value, and hence not bother to compute it in many cases due to Lazy evaluation... $h=$ENV{HOME};my@q=split/\n\n/,`cat $h/.quotes`;$s="$h/." ."signature";$t=`cat $s`;print$t,"\n",$q[rand($#q)],"\n"; [download]	[reply] [d/l]
Re^3: Perl6 Contest #2: P6 That Doesn't Look Like P5 by geoffb (Novice) on Jun 02, 2005 at 22:33 UTC
Good point. That was actually a holdover from when I did the non-coroutine recursive version -- the map wasn't void in that one. :-) Fixed in my working version.	[reply]