perl -wle'
sub test {
  print "test"
}
sub zwei {
  print "zwei"
}
$name = "test";
&{$name};
zwei();'
test
zwei