NET :: chat :: daemon net :: chat :: daemon è un modulo perl per eseguire un daemon controllato tramite messaggistica istantanea.
Scarica ora

NET :: chat :: daemon Classifica e riepilogo

NET :: chat :: daemon Tag

immediato messaggistica istantanea messaggistica modulo Perl Perl daemon

NET :: chat :: daemon Descrizione

NET :: chat :: daemon è un modulo perl per eseguire un demone controllato tramite messaggistica istantanea. NET :: Chat :: Daemon è un modulo Perl per eseguire un daemon controllato tramite messaggistica istantanea. AbstractQuesto pacchetto è destinato a servire come superclass per oggetti che desiderano comunicare tramite messaggi IM all'interno di una rete distribuita di nodi client e un coordinatore , senza trattare con le complessità o i dettagli di implementazione di ottenere effettivamente i messaggi da un posto a posto.it finge di essere protocollo-neutro, ma per ora e il futuro concepibile funzionerà solo con un trasporto jabber. (Utilizza direttamente gli oggetti del messaggio e le cose che Jabber tornano.) Nota che questo pacchetto non ti aiuterà a implementare un server di messaggistica istantanea. Questo pacchetto è per scrivere server che comunicano con altre entità tramite messaggi istantanei - server scritti utilizzando questo pacchetto sono messaggistica istantanea * client * .synopsis Package My :: Server; usa la base 'net :: chat :: daemon'; Sub handlehello {return "ciao anche a te"; } Sub HandlSave {My ($ nomefile, $ file) = @_; restituisce "negato" a meno che $ filename = ~ /^+$ /; Apri (My $ FH, "> / var / repository / $ nomefile") o ritorno "fallito: $!"; Stampa $ fh $ file; Chiudi $ fh o return "fallito: $!"; restituire "OK"; } sub sommethod {my ($ sé, @args) = @_; . . . } Sub New {My ($ Class, $ utente, Opzioni%) = @_; Restituisce $ Class-> Super :: Nuova (% Opzioni, Commands => {'CallMethod' => 'Somemethod', 'Salva' => HandlSave}); } Pacchetto principale; My $ Server = My :: Server-> nuovo ('MyUserid@jabber.org '); $ server-> processo (); # o per fare tutto in un passo, e riprovare le connessioni per 5 minuti # (300 secondi) prima di non riuscire a causa di problemi raggiungendo il server: My :: Server-> Run ('MyUserid@jabber.org ', riprova => 300 ); Quando si esegue questo, dovresti essere in grado di inviare un messaggio a userid@jabber.org dicendo "ciao" e ottenere una risposta indietro o "callmethod abc" per chiamare il metodo con gli argomenti indicati. Per utilizzare "Salva "Comando, è necessario utilizzare un client della riga di comando in grado di inviare allegati nel formato atteso da questo server (attualmente non utilizza formati di invio di file standard). Il comando Jabber ha confezionato con questo modulo può farlo tramite L'opzione -a della riga di comando. Una nota sull'implementazione: quando ho scritto questo, è stato davvero destinato a essere utilizzato solo con Jabber. Il codice non è stato completamente ristrutturato per rimuovere questa assunzione. Trequirementi: · Requisiti perl: · Perl.

NET :: chat :: daemon Software correlato