in reply to strict or not strict?

You can make a hash of references:

my %hash_refs = ( foo => \$foo, bar => \$bar );

Then look up the reference by name use it where you'd use the hash.

In Section Seekers of Perl Wisdom