Hello dideod.yang,

You can make your first foreach loop work with eval:

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

However, for reasons outlined in How can I use a variable as a variable name?, this is usually a bad idea. A better approach is to build a lookup table using a hash:

my %test_functions =
(
    test  => \&test,
    test2 => \&test2,
    test3 => \&test3,
);

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

Hope that helps,