my $paco = $foo->bar;

##</code><code>##

my $snafu=$foo->{bar};