Cor - מערכת OOP חלופית לפרל

היכנסו לקישור כדי להשוות בין Cor לבין Moose. קוד לדוגמה:

class Point {
יש ( $x, $y ) :reader :writer :new :isa(Int);

method clear() {
( $x, $y ) = ( 0, 0 );
}
}

class Point3D isa Point {
יש $z :reader :writer :new :isa(Int);

method clear() {
$self->next::method;
$z = 0;
}
}

מקור: linux.org.ru