Select Code to Download

sub makeMethod { 
  my $this = shift;
...
  my $this = shift;
  $this->{_coderef}->(@_)
}

$this->makeMethod( "somenewname", "some code" );
$this->somenewname();