You can only symbolically reference package global variables, not lexical variables. Try it with our $A; or use vars '$A';