package Bla; use accessors qw(foo bar baz);