my $function = 'a';
my %functions = (
    'a' => sub { ... },
    'b' => sub { ... },
);
$functions{$function}->();