Cache :: Ramdisk. Compartilhamento de objetos Perl entre processos em vários drives de RAM
Baixe Agora

Cache :: Ramdisk. Classificação e resumo

Cache :: Ramdisk. Tag

compartilhamento Módulo Perl. perl objetos Compartilhamento de objetos Perl. Aplicativos multi-process

Cache :: Ramdisk. Descrição

Compartilhamento de objetos Perl entre processos em vários drives de RAM Cache :: RamDisk é um módulo Perl que fornece aplicativos multi-processam um meio de compartilhar objetos perl entre os processos enquanto tentam evitar os inconvenientes inerentes a outras ferramentas IPC: 1. As filas de mensagens são extremamente rápidas, mas extremamente limitadas também. A memória compartilhada é talvez ainda mais rápido, mas saiu para mim ser um problema pelo menos peludo tentando armazenar várias referências em um segmento.3. Os soquetes são confiáveis, mas exigem um segundo endpoint de comunicação e ainda outro processo de servidor.Mas um arquivo é um arquivo é um arquivo. O pacote coleta tanto Ramisks para um pacote quanto possível e necessário para manter o espaço de usuário necessário, dependendo do respectivo parâmetros em que o kernel individual do sistema havia sido compilado. O usuário do sistema e o grupo que possuem o cache podem ser especificados para todo o grupo Rd, digamos cache.synopsysApplication Fase inicial: use cache :: Ramdisk :: Funções; cache_install ({'base' => '/ tmp / rd', 'tamanho' => 16, 'inodes' => 1024, 'sindex' => {'fie' => 8, 'FOE' => 64 ' FUM '=> 512},' shmem '=>' rdlk ',' chaves '=> {' fie '=> 50,' inimigo '=> 200,' fum '=> 4000},' usuário '=>' Apache ',' Group '=>' Apache '}); Código do Manipulador de Conteúdo: Use MyApp :: Fie; Meu $ Fie = MyApp :: Fie-> Novo (12345); Imprimir $ fie -> {'some_field'}; código do objeto: pacote myapp :: fie; Use cache :: Ramdisk; Sub new {My ($ Class, $ ID) = @_; Meu $ c = cache :: Ramdisk-> NOVO ('/ tmp / rd', cache_lru); Meu $ self = $ c-> get ({'fie' => $ ID}) -> {'fie'} -> {$ id} || Faça {# execute algumas lógicas DB $ auto = $ sth-> fetchrow_hashref; abençoe $ auto, $ classe; $ c-> colocar ({'fie' => {$ id => $ auto}}); } $ auto; } Mais tarde em um script CGI: Use CGI QW (: HTML); Use cache :: Ramdisk :: Funções; minhas $ s = cache_status ('/ tmp / rd'); Imprimir "Número de itens para 'Fie':". $ s-> key_stat ('fie'), br; no desligamento do aplicativo: cache_remove ('/ tmp / rd'); Requisitos: · Perl.

Cache :: Ramdisk. Software Relacionado