# red mode, @ISA = qw(Gatherer::Red) use StoneGatherer qw(red);