in reply to grep in hash of array

For the given example, the following ought to do (but I haven't tested it): 
$orange = $$xml{Fruits}[0]{Season}{Orange};

[download]
But I suspect that this isn't your real question.

In Section Seekers of Perl Wisdom