Classe :: DOT :: Tipo classe base para restrições de tipo
Baixe Agora

Classe :: DOT :: Tipo Classificação e resumo

Classe :: DOT :: Tipo Tag

Módulo Perl. perl modelo Classe perl. restrições Digite restrições

Classe :: DOT :: Tipo Descrição

Classe base para restrições de tipo Classe :: Dot :: Type é uma classe Perl base para restrições de tipo.Synopsis # Você provavelmente deseja obter essas informações do seu attribute __meta__ #. pacote Myclass; Use Classe :: DOT2; Propriedade 'Nome' => (ISA => 'str', default => 'Sr. Fox Rail Brown'); sub play_with_attribute_meta {my ($ self) = @_; Meu $ Name_Meta = $ auto -> __ meta __ ('nome'); # Obtenha o nome do tipo para nome do atributo. meu $ type = $ name_meta-> tipo; # Descubra que tipo de acesso isso é. (Padrão: Overridable) Meu $ Accessor_Type = $ Name_Meta-> Accessor_Type; # Obtenha uma sub-rotina Ref para a verificação de restrição para este tipo. Meu $ Check_Constraint = $ Name_Meta-> Restrição; meu $ Current_Value = $ auto-> nome; Se (! $ Check_Constraint -> ($ Current_Value)) {Croak "O valor do nome não passa a verificação de restrição para $ tipo"} # Obtenha o nome do getter e setter. Meu $ getter_name = $ NAME_META-> getter_name; meu $ setter_name = $ name_meta-> setter_name; # Obtenha o valor chamando o nome (): $ Current_Value = $ auto -> $ getter_name; # Defina o valor chamando set_name ($ valor) $ auto -> $ setter_name ('valor novo'); # Obtenha a lista dos pais para este tipo. meu @isa_for_type = $ meta-> linear_isa; # Obtenha a opção de privacidade para este tipo (padrão: público (RW)). meu $ privacy_type = $ meta-> privacidade; # Obtenha as regras de privacidade para este tipo de privacidade. Meu $ Privacy_Rules = $ meta-> privacy_rule; Imprimir $ Privacy_Rules -> {has_getter}; Imprimir $ Privacy_Rules -> {has_setter}; Retorna; } Requisitos: · Perl.

Classe :: DOT :: Tipo Software Relacionado