Cola :: mmap

Extensión Perl para la cola compartida sobre el archivo MMAP-ED
Descargar ahora

Cola :: mmap Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Nombre del editor:
  • Ildar Efremov
  • Sitio web del editor:
  • http://search.cpan.org/~iefremov/

Cola :: mmap Etiquetas


Cola :: mmap Descripción

Extensión Perl para la cola compartida sobre el archivo MMAP-ED Cola :: MMAP es una cola de círculo compartido sobre el archivo MMAP-ED.usfull para la cola de tareas de proceso múltiple. Un mensaje de trabajo (ES) presione el mensaje de tarea, y otros procesos (ES) Pop y ejecutan las tareas. Acceso con bloqueo (FCNTL) Garantizado orden derecho sin conflicto. Si los datos presionados tienen un tamaño mayor que registran los datos de LEN realizados en algunos registros. Si los datos presionados tienen un tamaño mayor que la capacidad (grabar * cola) presiona ha devuelto UNDEF.NEW% Params Cree un nuevo objeto de cola My $ q = nueva cola :: mmap (archivo => "file.dat", cola => 10, # Longitud de la longitud de la cola => 20, # longitud Un registro (si los datos más largos de registro, los datos se colocan en algunos registros) MOD => 0666, # Hacer modo para el archivo); PUSH $ STRING PULS $ STRING EN LA COLABLE CON EL RETRENDE FALSO DE BLOQUEO RETURN ($ TIME_PEND, $ TIME_WAIT_LOCK) en la matriz Context Devuelve $ TIME_PEND en ContextPop SCALAR PAGADO PAGADO COMIENZO DE LA COLA CON EL BLOQUEO C En el valor vacío Copiar el valor superior de la cola sin el retorno de bloque C en el valor superior de la caída de la cola de cola Desde la cola con el número de retorno de longitud de bloques de registros de la matriz de retorno de Queuestat: Índice Top Records F Tunter Longitud del archivo Alinee para 4k.Synopsis Use la cola :: MMAP; My $ Q = nueva cola :: mmap (archivo => "file.dat", cola => 10, # longitud de la longitud de la cola => 20, # longitud de un registro (si los datos más largos, los datos se colocan en algunos registros) mod => 0666, # Hacer modo para el archivo); a menos que ($ Q-> PUSH ("ABCDEFGHIJKLMNOPQRSTUVWXYZ")) {DIE "FALLO PUSH"; } MIS $ W = $ Q-> PUSH ("ABCDEFGHIJK"); printf "% .6f \ n", $ w; mi ($ t, $ l) = $ Q-> PUSH ("ABCDEFGHIJK"); Printf "Total =% .6F, WAY Lock% .6f \ n", $ t, $ L; Imprimir "Longitud de la cola es", $ q-> longitud, "\ n"; My $ TOP = $ Q-> Top; Mientras (definido (MIS $ V = $ Q-> POP)) {Imprimir $ V, "\ N"; } Imprimir "No hay datos \ n"; Requisitos: · Perl


Cola :: mmap Software relacionado