זען די לינק פֿאַר אַ פאַרגלייַך פון Cor און Moose. בייַשפּיל קאָד:
קלאַס פונט {
האט ($קס, $י): לייענער: שרייבער: נייַ: יסאַ (ינט);
מעטאָד קלאָר () {
($קסנומקס, $י) = (קסנומקס, קסנומקס);
}
}
קלאַס Point3D איז פּוינט {
האט $ז: לייענער: שרייבער: נייַ: איזאַ (ינט);
מעטאָד קלאָר () {
$self->ווייַטער::מעטאָד;
$ז = 0;
}
}
מקור: linux.org.ru