| Devel :: Constantes. Devel :: Constitantes é um módulo Perl que traduz constantes de volta aos símbolos nomeados. |
Baixe Agora |
Devel :: Constantes. Classificação e resumo
- Licença:
- Perl Artistic License
- Nome do editor:
- chromatic
- Site do editor:
- http://search.cpan.org/~chromatic/Crypt-CipherSaber-1.00/lib/Crypt/CipherSaber.pm
Devel :: Constantes. Tag
Devel :: Constantes. Descrição
Devel :: Constitantes é um módulo Perl que traduz constantes de volta aos símbolos nomeados. Devel :: Constitantes é um módulo Perl que traduz constantes de volta para nomeado símbolos.synopsis # deve preceder o uso constante uso de desenvolvimento :: constantes 'flag_to_names'; Use constante a => 1; Use constante b => 2; usar constante c => 4; Meu $ Flag = A | B; Imprimir "Bandeira é:", junte ('e', flag_to_names ($ flag)), "n"; declarar constantes é muito conveniente para escrever programas, mas como Perl muitas vezes inliná-los, recuperando seus nomes simbólicos podem ser complicados. Isto pior com módulos lowlevel que usam constantes para o bit-twiddling.devel :: Constantes torna isso muito mais gerenciável. Em silenciosamente envolva o módulo constante, interceptando todas as declarações constantes. Ele constrói um hash, associando os valores aos seus nomes, dos quais você pode recuperar seus nomes, conforme necessário. Não é necessário usar Desenvolvimento :: Constantes antes constantes, ou a magia não funcionará e você ficará muito desapontado. Isso é muito importante, e se você ignorar este aviso, os autores vão se sentir à vontade para rir de você (pelo menos um pouco. Por padrão, desenvolver :: constantes apenas interceptar declarações constantes dentro do mesmo pacote que usava o módulo. Também por padrão , ele armazena as constantes para um pacote dentro de uma variável privada (lida, inacessível). Você pode substituir ambos .Passando o sinalizador de pacotes para desenvolver :: Constantes com um nome de pacote válido fará o módulo interceptar todas as constantes declaradas subsequentemente esse pacote. Por exemplo, no pacote principal, você pode dizer: use Devel :: Constiting Package => NetPacket :: TCP; Usar NetPacket :: TCP; Todos os flags TCP declarados no NetPacket :: TCP agora estão disponíveis. Também é possível passar em uma referência de hash para armazenar os valores e nomes constantes: meu% constante_map; use desenvolver :: constantes% constant_map; use nome constante => 1; use classificação constante => 2; use serial constante => 4 ; Print Junte ('', valores% constant_map), "n"; requisitos: · Perl.
Devel :: Constantes. Software Relacionado