use strict;

sub foo { print "bar\n" }

my $func = "foo";
my $func_ref = \&{$func};

$func_ref->();

##</code><code>##

sub AUTOLOAD {
    # get params and function
    # ...
    
    my $func_ref = \&{$func};
    goto &{$func_ref};
}