Cor هو نظام OOP بديل لـ Perl

اتبع الرابط لمقارنة Cor وMoose. رمز المثال:

نقطة الفئة {
لديه ( $x, $y ) :reader :writer :new :isa(Int);

طريقة واضحة () {
( $x, $y ) = ( 0, 0 );
}
}

فئة Point3D هي نقطة {
لديه $z :reader :writer :new :isa(Int);

طريقة واضحة () {
$self->next::method;
$ض = 0;
}
}

المصدر: linux.org.ru

إضافة تعليق