in reply to Tiny Perl puzzle

Good puzzle. This sort of thing is precisely the reason various best practices have arisen.

use Moops; class Cow :rw { has name => (default => 'Ermintrude') }; say Cow->new->name