That's why I was asking if this was in support of legacy code. Most cases where this used to be needed would be handled with lexicals these days, so they are mostly reserved for things like $/. There are other ways to do what the OP is after, and I think they would probably be less confusing to non-expert Perl coders.