my $foo = { foo => { bar => 'baz' } };

foreach (keys %foo)
{
        if (defined($foo->{$_}->{foo})
         && defined($foo->{$_}->{foo}->{bar}))
        {
                return $foo->{$_}->{foo}->{bar};
        }

        return;
}