http://www.perlmonks.org?node_id=403922


in reply to Revisiting strict and @ISA

Something that basically no-one does but practically everyone *should* do is wrap their @ISA assignments in BEGIN blocks.

Change that to:

package Test1; use vars qw(@ISA); BEGIN { @ISA = qw(Test); }
And you should be just fine.
------------ :Wq Not an editor command: Wq