in reply to Find the word in Array, Hash, Scalar

print "\nfound $_\n" if grep {$_ eq 'tiger'} (@array_1, @array_2, $variable, values %hash)
Caution: Contents may have been coded under pressure.

In Section Seekers of Perl Wisdom