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