BEGIN { package Animal::Hog; ... $INC{'Animal/Hog.pm'} = __FILE__; }