Select Code to Download

    $row_obj->set_field("foo");
    $row_obj->get_field();
...
    # instead of 
    $row_obj->field("foo");
    $row->obj_field();

  sub mutator_name_for {
    my ($class, $column) = @_;
    return "set_" . $column->accessor;
  }