in reply to Re: A Case with 5 Var's
in thread A Case with 5 Var's

Or more succinctly:

my @found = grep exists $my_hash{ $_ }, qw( name vorname plz tel tel49 + );

Update: Good point below. Omit the exists if that's the desired behavior. MENTAL NOTE: NO POSTING OR UPDATING NODES BEFORE CAFFEINE TAKES EFFECT.

Replies are listed 'Best First'.
Re^3: A Case with 5 Var's
by dorward (Curate) on Jan 25, 2007 at 13:43 UTC

    The original code doesn't consider an empty string to be "found", but exists will.