6 lines
71 B
Perl
6 lines
71 B
Perl
|
package Dog;
|
||
|
|
use Animal;
|
||
|
|
@ISA = qw( Animal );
|
||
|
|
#functions go here...
|
||
|
|
1;
|