package Foo; use base qw(Class::Accessor); __PACKAGE__->mk_accessors('bar');