(\&{"Test::${pkg}::hello"})->($pkg); #### my $sub = \&{"Test::${pkg}::hello"}; $sub->($pkg); #### ("Test::".$pkg)->hello(...);