Select Code to Download

    # create method
    my $eval = "sub $class\:\:$name { goto \$hash{\$_[0]}}\n";
    eval $eval;

     *{"${class}::$name"} = $ref;