in reply to Re: Re: "foreach" is to "next" as "map" is to ???
in thread "foreach" is to "next" as "map" is to ???

I meant "equivalent" in the sense that @odds is the same after both the map and the foreach.

As far as equivalent code, I'd argue that this is closer to the map than your for loop using unless: 
my @odds;
for ( 0 .. 10 ) {
    push @odds => $_ % 2 ? $_ : ();
}

[download]
In the same way that the original foreach using next does not evaluate the push for every iteration, your code using push/unless does not evaluate the push every iteration.

--sacked

Replies are listed 'Best First'.
Re: Re: Re: Re: "foreach" is to "next" as "map" is to ???
by Limbic~Region (Chancellor) on May 26, 2004 at 16:50 UTC
    sacked,
    Maybe I am just nit picking, but if you meant equivalent results you should not have said equivalent code. 
    for ( @lines ) {
    next if /^#/;
    # ... a dozen lines of code
    push @paragraph, $_;
}

    [download]
    There is no sane way to do the equivalent of this in a map block. You can only choose not to provide the line to the paragraph at the last instruction.

    L~R

[reply]
[d/l]
      There is no sane way to do the equivalent of this in a map block.
      Of course there is. 
      map {
  !/^#/ ? () : do {
     # ... a dozen lines of code
  }
} @lines

      [download]

      Abigail

[reply]
[d/l]
      You wrote:
      There is no sane way to do the equivalent of this in a map block.
      @paragraph=
  map {
    if( /^#/ ) { () }
    else {
      # ... a dozen lines of code
      $_
    }
  } @lines;

      [download]

      --sacked
[reply]
[d/l]

In Section Seekers of Perl Wisdom