package Item;

our @ISA = qw(BaseItem);

...