in reply to Accessor methods again.

Get a copy of "Perl Best Practices" and do as Damian does :-)