Select Code to Download

my $method = "foo";
my $full_method = "set_$method";

my $return_value = $obj->$full_method;

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