Select Code to Download

my $coderef = \&{$testname};
$system = $coderef->($self, $system); #test

$self->$testname($system);