Select Code to Download

package Foo::Bar;

...

   return $self->{_name};
}

my $bar = Foo::Bar->new( name => 'Bob Lambert' );

print "Name of my object " . $bar->name    . "\n"; # method call
print "Name from my hash " . $bar->{_name} . "\n"; # hash key