ANYEVENTE :: MP

Marco de multiprocesamiento / paso de mensajes de estilo Erlang-Style
Descargar ahora

ANYEVENTE :: MP Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Marc Lehmann
  • Sitio web del editor:
  • http://www.goof.com/pcg/marc/

ANYEVENTE :: MP Etiquetas


ANYEVENTE :: MP Descripción

Marco de multiprocesamiento multi-procesamiento de estilo Erlang / Mensaje ANYEVENT :: MP es un módulo PERL (-Familia) que implementa un simple mensaje de aprobación de mensajes. Muestre su simplicidad, puede enviar de forma segura otros procesos que se ejecutan en los mismos o otros hosts, y puede supervisar a las entidades de forma remota. Para una introducción a este Familia del módulo, consulte el AnyEVENT :: PAGO DE MP :: Intro Manual y los ejemplos en EG / .synopsis Use ANEYEVENT :: MP; $ Node # contiene el nodo ID de nodo de este nodo # devuelve el ID de nodo de este nodo ID $ # Recepción / ID de puerto de recepción / propio en RCV Callbacks # Inicialice el nodo para que pueda enviar / recibir mensajes configure; # Puertos son los destinos de mensajes # Envío de mensajes SND $ PORT, TIPO => DATOS ...; SND $ PORT, @MSG; snd @msg_with_first_element_being_a_port; # Creación / uso de puertos, la forma sencilla My $ Simple_port = Port {My @msg = @_}; # Creación / Uso de puertos, etiquetado Mensaje que coincide con My $ Port = Puerto; rcv $ puerto, ping => sub {snd $ _ , "pong"}; RCV $ PORT, PONG => SUB {WARN "PONG recibido \ N"}; # Crear un puerto en otro nodo My $ Port = Spawn $ Nodo, $ initfunc, @initdata; # Destruya un puerto de PUT $ $ $; # "Normal" Mill KIL $ PORT, MY_ERROR => "Todo está roto"; # Error Kill # Monitoring MON $ LOCALPORT, $ CB -> (@ MSG) # La devolución de llamada se invoca en la muerte MON $ LOCALPORT, $ OWERPORT # Mata a Ownerport en la muerte anormal Mon $ localport, $ Owerport, @msg # Enviar mensaje en la muerte # Ejecute temporalmente el código en el contexto del puerto PEVAL $ PORT, SUB {DIE "¡Mata al puerto!" }; # Ejecutar devoluciones de llamada en $ Optor Port contexto My $ TIMER = AE :: Timer 1, 0, PSUB {DIE "Mata al puerto, retrasado"; }; Requisitos: · Perl


ANYEVENTE :: MP Software relacionado