> I'm more in favor of a mechanism that makes it easy to build field
> names from the package name, for those rare cases where you want
> scoped fields. There were discussions about this a couple of years ago
> on p5p. For example:
>
> package Foo;
>
> sub new { bless { "${CURRENT_PACKAGE}name" => 'Simpson' ... }
>
> ...where $CURRENT_PACKAGE is a special variable automatically set
> to...guess what? ;-)
See the Tie::Securehash module for a variation on this theme.
Also note that I will be proposing something similar in my
general revamp of Perl OO (RFCs galore, probably next week).
Damian