Select Code to Download

package MyObj;
use Class::MakeMethods::Autoload { 
  'new' => 'Template::Hash::new', 
  '.*'  => 'Template::Inheritable::code_or_scalar -method',
};

my $person = MyObj->new();

# Simple string get/set
...
# You can change the method repeatedly with the same syntax:
$person->greeting( sub { "Hi there!" } );
print $person->greeting();