Re^3: deleting a specific element from an array

I think you want

my $dels = join '|',
           map quotemeta,
           @dels;

@array = grep !/$dels/, @array
[download]

That deletes "applepie" when "apple" is in @dels.

Comment on Re^3: deleting a specific element from an array Select or Download Code

Replies are listed 'Best First'.
Re^4: deleting a specific element from an array by oko1 (Deacon) on Dec 03, 2008 at 03:10 UTC
Of course, if you only wanted to delete exact matches, you could extend ikegami's solution like so: `@array = grep !/^($dels)$/, @array;` [download] Now, 'apple' will no longer result in 'apple pie' being deleted. -- "Language shapes the way we think, and determines what we can think about." -- B. L. Whorf	[reply] [d/l]
Re^5: deleting a specific element from an array by kyle (Abbot) on Dec 03, 2008 at 03:18 UTC
Now, 'apple' will no longer result in 'apple pie' being deleted. ...but `"apple\n"` still gets tossed. Use `\z` to match the literal end-of-string and `$` for end-of-string-or-newline-you-know-whatever.	[reply] [d/l] [select]
Re^6: deleting a specific element from an array by oko1 (Deacon) on Dec 03, 2008 at 18:09 UTC
Why, no - it doesn't. `ben@Tyr:~$ perl -wne'print length, ": $_" if /^(apple)$/' apple 6: apple` [download] '$' in regular expressions matches before '\n'. -- "Language shapes the way we think, and determines what we can think about." -- B. L. Whorf	[reply] [d/l]
Re^7: deleting a specific element from an array by ikegami (Patriarch) on Dec 03, 2008 at 18:22 UTC
Re^8: deleting a specific element from an array by oko1 (Deacon) on Dec 04, 2008 at 01:13 UTC
Re^7: deleting a specific element from an array by kyle (Abbot) on Dec 03, 2008 at 18:20 UTC
Re^4: deleting a specific element from an array by sugar (Beadle) on Dec 03, 2008 at 03:28 UTC
it works :)	[reply]