Cor සහ Moose සංසන්දනය කිරීමට සබැඳිය අනුගමනය කරන්න. උදාහරණ කේතය:
පන්ති ලක්ෂ්යය {
ඇත ($x, $y ) :reader:writer:new:isa(Int);
ක්රමය පැහැදිලි() {
($x, $y) = (0, 0 );
}
}
පන්තියේ Point3D isa Point {
$z :reader :writer :new :isa(Int);
ක්රමය පැහැදිලි() {
$self->ඊළඟ:: ක්රමය;
$z = 0;
}
}
මූලාශ්රය: linux.org.ru