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

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

        return;
}

##</code><code>##

my $foo = [
        { foo => { bar => 'baz' } },
];

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

        return;
}

##</code><code>##

my $foo = [
        { foo => 'bar' },
];

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

        return;
}