I don't think anything currently exists to do what you want. But you probably could have added that line of code and tested it in the time it took you to write the above post (:

----
I wanted to explore how Perl's closures can be manipulated, and ended up creating an object system by accident.
-- Schemer

Note: All code is untested, unless otherwise stated