Cor est un système POO alternatif pour Perl

Suivez le lien pour comparer Cor et Moose. Exemple de code :

point de classe {
a ( $x, $y ) :reader :writer :new :isa(Int);

méthode clear() {
( $x, $y ) = ( 0, 0 );
}
}

la classe Point3D est un Point {
a $z :reader :writer :new :isa(Int);

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

Source: linux.org.ru

Ajouter un commentaire