You could tie the variables in question. You'd then write a STORE function that would behave in the new and wonderful way. I don't believe you can redefine the default STORE method.
Caution: Contents may have been coded under pressure.
Comment on Re: How to wrap Perl assignment operator?