Select Code to Download

sub function_1 { print "One\n" }
sub function_2 { print "Two\n" }

...
        &{ "function_$no" }; # <--- THIS THING
    }
}

sub function_1 { print "One\n" }
sub function_2 { print "Two\n" }

...

    $functions{$no}->();
}