| OpenInteract2 :: Config :: Inicializador OpenInteract2 :: Config :: Inicializer é um módulo Perl para eventos de inicialização de configuração observáveis. |
Baixe Agora |
OpenInteract2 :: Config :: Inicializador Classificação e resumo
- Licença:
- Perl Artistic License
- Nome do editor:
- Chris Winters
- Site do editor:
- http://search.cpan.org/~cwinters/SPOPS-0.87/SPOPS/SQLInterface.pm
OpenInteract2 :: Config :: Inicializador Tag
OpenInteract2 :: Config :: Inicializador Descrição
OpenInteract2 :: Config :: Inicializer é um módulo Perl para eventos de inicialização de configuração observáveis. OpenInteract2 :: Config :: O Inicializer é um módulo Perl para eventos de inicialização de configuração observável.synopsis # Adicione um inicializador no seu pacote.conf Nome MyPackage Versão 1.10 ... Config_Watcher OpenInteract2 :: MyInitializersPops Config_Watcher OpenInteract2 :: MyinitializerCortion # e o código em nosso Pacote - Vamos adicionar dinamicamente uma regra de # 'My :: Googlable' a uma classe onde 'is_googlable' é definido como 'Sim' Package OpenInteract2 :: MyinitializersPops; Use rigoroso; Sub atualização {My ($ Class, $ Type, $ Config) = @_; retornar a menos que ($ tipo EQ 'Spops'); if ($ config -> {is_googlable} eq 'yes') {push @ {$ config -> {regras_from}}, 'meu :: Googable'; }} # Adicione um observador de configuração na configuração do servidor Class = OpenInteract2 :: MyInitializerAtionAcionAtion. e na classe Vamos adicionar dinamicamente um filtro a uma ação onde # 'is_googlable' é 'sim' pacote openinteract2 :: myinitializeration; Use rigoroso; Use o OpenInteract2 :: Contexto QW (CTX); Sub atualização {My ($ Class, $ Type, $ Config) = @_; retorne a menos que ($ tipo eq 'ação'); if ('sim' eq lc $ config -> {is_googlable}) {ctx-> map_observer (Google => $ config -> {Class}); }} Requisitos: · Perl.
OpenInteract2 :: Config :: Inicializador Software Relacionado