Re^2: lsearch for perl?

Thanks to all for your replies - they were all very helpful.

Things like this

@list = grep { $item ne $_ } @list;
[download]

aren't in the man-page, and got me thinking. This however:

my ($index) = grep { $item eq $list[$_] } 0..$#list;
splice(@list, $index, 1) if defined $index;
[download]

was a real satori, Keanu-Reeves-like "Whoah!!" moment for me. The idea of using grep on a list without naming _that_ list as the argument to grep would never have occurred to me. Guess I was stuck in Unix grep thinking!

Feeling quite humbled.

Comment on Re^2: lsearch for perl? Select or Download Code

Replies are listed 'Best First'.
Re^3: lsearch for perl? by ikegami (Patriarch) on Dec 06, 2005 at 15:33 UTC
Things like this aren't in the man-page `grep` accepts any code in the block. It doesn't have to be a regex. `grep` is useful for filtering out items from a list, while `map` is useful for transforming a list. The idea of using grep on a list without naming _that_ list as the argument to grep would never have occurred to me. It's an concept I picked up on PerlMonks too :)	[reply] [d/l] [select]