Tingnan ang link para sa paghahambing ng Cor at Moose. Halimbawang code:
class Point {
ay may ($x, $y ) :reader :writer :new :isa(Int);
method clear() {
($x, $y ) = ( 0, 0 );
}
}
class Point3D isa Point {
may $z :reader :writer :new :isa(Int);
method clear() {
$self->next::method;
$z = 0;
}
}
Pinagmulan: linux.org.ru