Cor와 Moose를 비교하려면 링크를 참조하세요. 샘플 코드:
클래스 포인트 {
has ( $x, $y ) :reader :writer :new :isa(Int);
메소드 클리어() {
( $x, $y ) = ( 0, 0 );
}
}
클래스 Point3D isa 포인트 {
$z :reader :writer :new :isa(Int);
메소드 클리어() {
$self->next::메소드;
$z = 0;
}
}
출처 : linux.org.ru