Update Cat.pm