Select Code to Download

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

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