in reply to Re: Finding duplicate keys
in thread Finding duplicate keys

I'd want to avoid the incrementalism required by using push this way. At least replace that for() loop with a grep() loop.

@found = grep exists $search{$_}, @keys1