Net :: Imp.

Protocolo de Inspeção e Modificação
Baixe Agora

Net :: Imp. Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • Steffen Ullrich
  • Site do editor:
  • http://search.cpan.org/~sullr/

Net :: Imp. Tag


Net :: Imp. Descrição

Imp é um protocolo de inspeção, modificação e rejeição de dados entre dois lados (servidor e cliente) usando um analisador de implementação desta interface.Synopsis pacote mysessionlog; Use a Base 'Net :: Imp :: Base'; Use Net :: Imp; # cria objeto de fábrica sub new_factory {my ($ classe,% args) = @_; ... Criar objeto de fábrica ... $ fábrica-> New_Analyzer chamadas posteriormente $ class-> new_analyzer ...} # cria novo objeto analisador, recebe% args de fábrica sub new_analyzer {my ($ classe,% args) = @_; ... lidar com% intestino args ... My $ self = $ class-> super :: new_analyzer (% args); # Prepará-lo para sempre em ambas as direções $ Self-> Add_Results (, # para DIR Cliente-> Server ; # para Servidor DIR-> cliente); retornar $ auto; } # novos dados para análise, $ deslocamento só deve ser definido se houver lacunas # (por exemplo, quando passarmos dados com compensação no futuro) sub data {my ($ auto, $ dir, $ data, $ deslocamento) = @_ ; ... Dados de log ...} Pacote principal; Se (meu @err = mysessionlog-> validate_cfg (% config) {die "@err"} minha $ fábrica = mysessionlog-> new_factory (% config); # chama MySessionLog-> New_Analyzer Meu $ analisador = $ fábrica-> new_analyzer (...); $ analisador-> set_callback (\ Imp_CB); $ Analyzer-> Dados (0, 'Dados do Dir 0'); .... Ligará Imp_CB assim que os resultados estiverem lá ... $ analisador-> dados (0, ''); # eof de dir 0 # Callback para resultados Sub Imp_CB {para my $ rv (@_) {my $ rtype = shift (@ $ RV); Se ($ rtype == Imp_Pass) ...}} página inicial do produto


Net :: Imp. Software Relacionado