use strict; my $code_ref = {'SUM', 'sum'}; sub sum($$){...} ($codes->{'SUM'})->(4,5);