my %dispatcher = ( foo => 'set_foo', bar => 'set_bar' );
my $method = $dispatcher{$code};
$self->$method( $parameter );