in reply to What's the idiom for finding and removing the found @ARRAY element?

splice @$ref, do { my $i = 0; $i++ until $i > $#$ref or $ref->[$i] eq 'foo'; $i }, 1;

Makeshifts last the longest.

  • Comment on Re: What's the idiom for finding and removing the found @ARRAY element?
  • Download Code

In Section Seekers of Perl Wisdom