P:\test>perl -wMStrict -le"sub func{ print 'Hello world'; } my $funcname='func'; &$funcname;"
Hello world

P:\test>perl -wMStrict -le"sub func{ print 'Hello world'; } &{ $ARGV[0] };" func
Hello world