my $var = "apple"; if (exists( { banana => 1, plum => 1, apple => 1, strawberry => 1, pea => 1,}->{$var} )) { print "yes!\n"; } else { print "no.\n"; }