package Sheep; use strict; @Sheep::ISA = qw/Animal/; sub sound { "bah" } 1;