my $ret_value = $obj->${\"set_$method"};