$var = 'funcname';
&$var();
sub funcname { print "Hello\n" }