Help for this page

Select Code to Download


  1. or download this
    sub introduce {
    my($self)=$_[0];
...
#    $self->tellName();
    tellName( $self );
}
  2. or download this
    Hello, I'm Alice.

Hi, I'm Billy The Kid.
Here's my mom: Hello, I'm Alice.
  3. or download this
    package child;
sub tellName  {
...
        $self->SUPER::tellName();
    }
}