package Cat; use Animal; @ISA = qw( Animal ); #functions go here... 1;