Select Code to Download

#----------------------------------------
package Zoo::Animal;
...
    print "Lama initialised\n";
    return $self;
}

package Zoo::Zoo;

...
use lib '.';
use base qw( Zoo::Animal Zoo::Camel Zoo::Lama );