Ai :: Freehal :: Class Suporte para criar classes padrão "de dentro para fora"
Baixe Agora

Ai :: Freehal :: Class Classificação e resumo

Ai :: Freehal :: Class Tag

Módulo Perl. Aulas De dentro para fora aulas de dentro para fora Freehal.

Ai :: Freehal :: Class Descrição

Suporte para criar classes padrão "de dentro para fora" Ai :: FreeHal :: Classe é um módulo Perl que oferece suporte para criar classes padrão "de dentro". Use AI :: Freehal :: Class; # Criar armazenamento para atributos de objetos ... Meu% Nome: Attr; My% Rank: Attr; My% Snum: Attr; meu% public_data: attr; # Lidar com a inicialização de objetos desta classe ... Sub Build {My ($ self, $ OBJ_ID, $ arg_ref) = @_; $ NAME {$ OBJ_ID} = Check_name ($ arg_ref -> {nome}); $ rank {$ obj_id} = check_rank ($ arg_ref -> {rank}); $ snum {$ obj_id} = _gen_uniq_serial_num (); } # Lidar com a limpeza de objetos desta classe ... Sub demolir {my ($ self, $ obj_id) = @_; _recycle_serial_num ($ snum {$ obj_id}); } # Lidar com chama de método desconhecido ... Sub autometethod {my ($ self, $ obj_id, @other_args) = @_; # Retorna quaisquer dados públicos ... se (m / a obter _ (. *) /) {# Nome do método passado em $ _ meu $ get_what = $ 1; retorno sub {return $ public_data {$ obj_id} {$ get_what}; }} Avisar "Não é possível ligar para $ método_name", Ref $ self, "Object"; Retorna; # A chamada é recusada por não retornar um sub refr.} Este módulo fornece ferramentas que ajudam a implementar a estrutura de classe "OBJECT" de dentro para fora "de uma maneira conveniente e padrão.Porions do seguinte código e documentação de" Perl Melhores Práticas ". c) 2005 por O'Reilly Media, Inc. e reimpresso com permissão. Requisitos: · Perl.

Ai :: Freehal :: Class Software Relacionado