in reply to Ways to control a map() operation

You can exit map() with a return, like this: sub{ map { print ; return if 5 >= $_ ; $_ } @arr; }->();

but in doing so, now you can no longer store the map-derived values to a named array, you will have to push them:

# This is no good, values are not stored in @early: sub{ @early = map { print ; return if 5 >= $_ ; $_ } 3..9; }->();

# This is how to store values into @early : sub{ map { print ; return if $_ == 5 ; push @early, $_ } 3..9; }->(); Here is the full snipplet: 

my @arr = 3..9 ;
our @early;

sub{ map { print ; return if $_ == 5 ; push @early, $_ }  @arr; }->();

print "@early";

[download]

Replies are listed 'Best First'.
Re^2: Ways to control a map() operation
by Aristotle (Chancellor) on Jul 16, 2006 at 12:07 UTC

    What’s the point? Just use a foreach already.

    my @arr = 3..9 ;
our @early;

sub{
    for( @arr ) {
        print;
        return if $_ == 5;
        push @early, $_;
    }
}->();

print "@early";

    [download]

    Of course, that’s just an obfuscated way of writing the following:

    my @arr = 3..9 ;
our @early;

for( @arr ) {
    print;
    last if $_ == 5;
    push @early, $_;
}

print "@early";

    [download]

    So no, there’s no sensible way to abort a map early.

    Makeshifts last the longest.

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom