my $oldclass = ref $self;
   bless $self, "person";
   print "Here's my mom: ";
   $self->introduce();
   bless $self, $oldclass;