OK nach näherer Ansicht deines Codes, denke ich du willst ungefähr sowas

sub decorate (\&decorator, \&func) {}

Mit Prototypgeschick wirds syntaktisch einfach, du schreibst dann nur noch so was

decorate {...code ...} &func;

das ändern der Symboltabelle passiert dann intern in decorate().