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