Paralelo :: depender Despacho dependiente paralelo de Perl o código de concha
Descargar ahora

Paralelo :: depender Clasificación y resumen

Paralelo :: depender Etiquetas

perla funciones métodos Funciones de Perl Métodos perl Despacho dependiente paralelo

Paralelo :: depender Descripción

Despacho dependiente paralelo de Perl o código de concha Parallel :: Depende es un módulo PERL que hace paralelo, el envío dependiente de los métodos PERL, las funciones de Perl, los bloques de código en línea o los comandos externos de Shell. La sintaxis del horario se deriva de HACE, pero no requiere que todos los trabajos se envuelvan en código de cáscara para ejecutar y también admiten los subcarpendios ("Grupos") que se envíen como una unidad. Historial de ejecución, incluidos STdout y STDERR de cada trabajo, se mantiene en los archivos por trabajo para el acceso más simple después de la mina de hechos. Use Base QW (paralelo :: Dependió lo que sea :: otra cosa); My $ Manager = Mine-> Constructify (lo que sea); MI @argz = (# Asignar valores a los atributos reiniciar => '', # reiniciar en proceso cola fuerza => '', # ignorar / sobrescribir la ejecución anterior verbose => 1, # call (0), progreso (1), Detalle (2). Depuración => 0, # DB :: Solicitud individual antes del primer análisis, despacha nofork => '', # Single-Stream, Útil para pruebas. maxjobs => 8, # 0 => ilimitado, x <0 => NOFORK. FORK_TTYS => '', # usado para $ db :: fork_tty con el depurador Perl autoload => '', # Elija entre AutoLoad y Shell LogDir => "$ bin /../ var / log", # stderr , STODOUT archivos RUNDIR => "$ bin /../ var / run", # PROCESO DE ESTADO DE TRABAJO SCHEAR => ('BAR') BIM = {su código aquí} # $ anon_sub -> ('bim') bam = / SISTEMA DE PATH / A / SHELL # ('/ ruta / to / shell', 'bam') este sistema = ./BLAH -A -B # SISTEMA ('./BLAH -A -B', 'este') # ejemplo de Reutilizando un alias: Zip A # maxjobs archivos en paralelo. /tmp/bakcup/bigdump.aa = squish /tmp/bakcup/bigdump.ab = squish /tmp/bakcup/bigdump.ac = squish /tmp/bakcup/bigdump.ad = squish /tmp/bakcup/bigdump.ae = squish /tmp/bakcup/bigdump.af = squish / tm P / BAKCUP / BIGDUMP.AA: /TMP/bakcup/bigdump.ab: /tmp/bakcup/bigdump.ac: /tmp/bakcup/bigdump.ad: /tmp/bakcup/bigdump.ae: / tmp / bakcup / bigdump .AF: # Los grupos son subcarpecarios que tienen su número de nombres de # propio para trabajos, son Skpped por completo # en reinicio si el grupo se completa con éxito, # y puede establecer sus propios atributos. PASS2 # Empleos de servicio pesado. PASS2 # Todo esto puede ejecutarse en Pass2 # Paralelo, no hay daño dividiéndolos PASS2 # Alias ​​definidos localmente: estos son pass2 # * no * lo mismo que los trabajos anteriores. PASS2 Atributos # Se pueden configurar, aplicarse a todos los niveles de # anidados. útil dentro de grupos. #, por ejemplo, extraer los contenidos de algunos archivos #, procesarlos, luego limpiar los resultados #. Cada grupo usa su propio alias # para manejar los archivos. maxjob% 0 # Forks ilimitados después de # bidireccional solo para después del grupo anterior # alias predeterminados dentro del grupo después de durante anteriormente $ mgr-> extracto ('file1') antes de # $ mgr-> extracto ('file2') durante # $ mgr-> proceso ('file1') durante # $ mgr -> Proceso ('file2') Después de # $ Mgr-> Limpieza ('File1') Después de # $ MGR-> Limpieza ('File2') # Asignar atributos específicos del trabajo - principalmente a Control # Verbosity o bandera trabajos como instalación de horarios ad-hoc. Este ~ ad_hoc # predeterminado para todos los atributos es 1 este ~ verbose 0 # o agregue su propio valor que ~ verbose 2 #, ya que podría haber adivinado ahora, texto después de # un signo de hash sin escape se trata como comentario ..end) ; My $ Result = Eval {$ Manager-> Prepare (@argz); # pararee, valide la cola. $ gerente-> validate; # Comprobar por puntos muertos $ manager-> Ejecutar; # hacer el hecho "el final"} o morir $ @; o simplemente: $ manager-> Preparar (@argz) -> Validate-> Ejecutar; # Si desea obtener un nuevo objeto de un # nuevo y usarlo para ejecutar los puestos de marcha o agregar # ad_hoc (por ejemplo, clase de fábrica), entonces usted debe compartir la cola para el nuevo objeto. Sub Derive_new_Object {My $ MGR = Shift; My $ derivado = $ mgr-> nuevo (@_); $ mgr-> share_queue ($ derivado); $ Derived} # En este punto, el objeto derivado usa # la misma cola que el número de $ Administrador original (no es un clon, el mismo). Ejecución # con $ derivado tendrá el mismo efecto # en la cola como $ gerente. $ derivado-> ejecutado; Requisitos: · Perl

Paralelo :: depender Software relacionado