Select Code to Download

$ perl -Mstrict -Mwarnings -le '
    package Parent;
...
'
Parent object char = parent
Son object char = son

$ perl -Mstrict -Mwarnings -le '
    package Parent;
...
'
$parent_obj class = Parent
$son_obj class = Son

$ perl -Mstrict -Mwarnings -le '
    package Parent;
...
$son_obj class = Son
$daughter_obj class = Daughter
$grandson_obj class = Grandson