Select Code to Download

my $arg = shift;

...
else {
    do_yet_even_more_other_stuff()
}

my $arg = shift || 'DEFAULT';
my %lookup = (
...
);

$lookup{$arg}->();