| CGI :: Cache. CGI :: Cache é uma extensão Perl para ajudar a proteger a saída de scripts CGI intensivos em tempo. |
Baixe Agora |
CGI :: Cache. Classificação e resumo
- Licença:
- Perl Artistic License
- Nome do editor:
- Broc Seib
- Site do editor:
- http://search.cpan.org/~dcoppit/
CGI :: Cache. Tag
CGI :: Cache. Descrição
CGI :: Cache é uma extensão Perl para ajudar a cache a saída de scripts CGI intensivos em tempo. CGI :: Cache é uma extensão perl para ajudar a saída de cache de scripts CGI intensivos em tempo. A interface da versão 1.01 foi alterada consideravelmente e não é compatível com versões anteriores. Uma mudança de interface menor também ocorreu na versão 1.20.synopsishere é um simples exemplo: #! / Usr / bin / perl Use CGI; use cgi :: cache; # Configurar cache cgi :: cache :: setup (); Meu $ CGI = Novo CGI; # Cgi :: vars requer CGI versão 2.50 ou melhor cache :: cache :: set_key ($ cgi-> vars); # Isso deve curto-circuito o resto do loop se um valor de cache for # já há cgi :: cache :: start () ou saída; Imprimir $ CGI-> Cabeçalho, "N"; Imprimir
Isso imprime a stdout, que será armazenado em cache. Se a próxima visita estiver dentro de 24 horas, o stdout em cache será servido em vez de executar essa 'impressão'.
Efhere é um exemplo mais complexo: use CGI; use cgi :: cache; Minha consulta $ = New CGI; # Configurar um cache In / TMP / CGI_CACHE / Demo_CGI, com publicidade # Irrease Entradas de cache, um tamanho máximo de 20 megabytes, # e uma hora a viver de 6 horas. Cgi :: cache :: setup ({cache_options => {cache_root => '/ tmp / cgi_cache', namespace => 'demo_cgi', directory_umask => 077, max_size => 20 * 1024 * 1024, default_expires_in => '6 horas ',}}); # Cgi :: vars requer CGI versão 2.50 ou melhor cache :: cache :: set_key ($ query-> vars); Cgi :: cache :: invalidate_cache_entry () se $ query-> param ('force_regenerado') eq 'true'; CGI :: cache :: start () ou saída; Imprimir "Tipo de conteúdo: texto / htmlnn"; Imprimir
Isso imprime a stdout, que será armazenado em cache. Se a próxima visita for dentro de 6 horas, o stdout em cache será servido em vez de executar essas "impressões".
eof cgi :: cache :: pausa (); Requisitos de impressão: · Perl.
CGI :: Cache. Software Relacionado