Select Code to Download

my %mungers = (
            foo => sub { $_[0] =~ s/foo/bar/g },
...
} else {
  $mungers->{fru}->( $string );
}