Help for this page

Select Code to Download

Select or download this

package Mascot;

...
  my $self = shift;
  the_mascot $self->{ANIMAL};
}