解决方法
从
perldoc perlmod:
The special symbol __PACKAGE__ contains the current package,but cannot (easily) be used to construct variable names.