for (@actions) {
    my @act = split " ";
    $action_code{$act[0]}->(@act[1..$#act]);
}