Re: change perl function in runtime

You need *globs to manipulate symbol table entries like package functions! ( see perlmod and perlsub)

Something like this should do

{
  package A;
  local *x = sub { die "aaa" };
 
  #run tests
  ...
}
# &x reset after leaving block
[download]

if you want to explicitly reset &x try to store the old coderef before.

$old_coderef = \&x;
 
# run tests
... # do what you want 
... # (but think about the omen ;-)
 
*x = $old_coderef;
[download]

Cheers Rolf

Comment on Re: change perl function in runtime Select or Download Code

Replies are listed 'Best First'.
Re^2: change perl function in runtime by david2008 (Scribe) on Dec 03, 2012 at 15:41 UTC
It works very well. This is real perl alchemy :-)	[reply]