Help for this page

Select Code to Download

Select or download this

    package Child;
    use base qw(Mother Father);

Select or download this

    package Child;
    use base qw(Mother Father);

    sub DESTROY { $_[0]->EVERY::DESTROY }