Select Code to Download

sub _setter_getter_maker
{
...

  return $funcref;
}

my $pretend_object = {};
my $new_func = _setter_getter_maker($pretend_object, 'attrib');

#Now we can set a value for 'attrib' in this object
$new_func->('value');