Das geht mit dem lvalue-Atrribute aus dem Modul attributes. Ob das eine gute Idee ist ist die nächste Frage. Siehe auch perlsub.