I need to redefine a subroutine from one package to a subroutine from
another.

This code works and does what I want it to, however I need to write it so
it isn't hard coded. The posible necessary escapes, evals, single quotes
and double quotes make me woozy.

    ##### WORKS !!!! #####
       undef &Default_DB::special_code ;
       *DatabaseLib::special_code    = \&Sybase_DB::special_code ;


At this point  I really have no idea how the syntax should look to do the
above, can someone help?

I think it should start like this:

$old_module  = "\&DefaultLib\:\:special_code" ;
$new_module = "\&SybaseLib\:\:special_code" ;




Jeff






Reply via email to