This sounds like a good situation for a dispatch table e.g

my $dispatch = {
    foo => \&foo,
    bar => sub { print "an anon sub\n" },
    baz => \&Package::function
};
[download]

Yes a dispatch table would be poifict.

<cough>
The hackish solution would be

my %dispatch = map { $_ => \&{$hash{$_}} } keys %hash;
[download]

And definitely for the likes of obfu. Ahem.
</cough>
HTH

_________
broquaint