http://www.perlmonks.org?node_id=339207


in reply to Re: It's a dog, but what kind? (polymorphism , in Perl OO)
in thread It's a dog, but what kind? (polymorphism , in Perl OO)

Actually it does. The code was actually tested before I posted it. What you see is what I got.

Peter L. Berghold -- Unix Professional
Peter at Berghold dot Net
   Dog trainer, dog agility exhibitor, brewer of fine Belgian style ales. Happiness is a warm, tired, contented dog curled up at your side and a good Belgian ale in your chalice.
  • Comment on Re: Re: It's a dog, but what kind? (polymorphism , in Perl OO)

Replies are listed 'Best First'.
Re: Re: Re: It's a dog, but what kind? (polymorphism , in Perl OO)
by hardburn (Abbot) on Mar 23, 2004 at 21:36 UTC

    I see where I went wrong. I read the above as bless $self, $class instead of bless $self, $breed.

    In any case, I still think that if you want this to be a good tutorial on polymorphism, some of the subclasses should override bark. As it is, it doesn't take advantage of polymorphism.

    ----
    : () { :|:& };:

    Note: All code is untested, unless otherwise stated

[reply]
[d/l]
[select]

          good tutorial on polymorphism, some of the subclasses should override bark.

      DOH! I meant to and forgot! Actually the subclass cocker was going to override "wag_tail" since they have short tails more or less wiggle their hind ends instead. ;-)

      Peter L. Berghold -- Unix Professional
      Peter at Berghold dot Net
         Dog trainer, dog agility exhibitor, brewer of fine Belgian style ales. Happiness is a warm, tired, contented dog curled up at your side and a good Belgian ale in your chalice.
[reply]

In Section Tutorials