Select Code to Download

foreach my $array (@array)
{
    eval "$array->()";
}

my %test_functions =
(
...
);

$test_functions{$_}->() for qw/ test test2 test3 /;