fili

Discussioni basate su interprete perl
Scarica ora

fili Classifica e riepilogo

Annuncio pubblicitario

  • Rating:
  • Licenza:
  • Perl Artistic License
  • Prezzo:
  • FREE
  • Nome editore:
  • Jerry D. Hedden
  • Sito web dell'editore:
  • http://search.cpan.org/~jdhedden/

fili Tag


fili Descrizione

Fili a base di interprete perl Questo č un modulo filetti basato su interprete perl.Synopsis Utilizzare i thread ('rendimento', 'stack_size' => 64 * 4096, 'exit' => 'threads_only', 'Stringify'); sub start_thread {my @args = @_; Stampa ('Thread avviata:', Iscriviti ('', @Args), " ");} My $ Thr = Threads-> Crea ('Start_Thread', 'Argument'); $ ThR-> Iscriviti (); Threads-> Crea (Sub {Stampa (" Io sono un thread ");}) -> Iscriviti (); My $ Thr2 = Async {foreach (@files) {...}}; $ Thr2-> Iscriviti (); IF (MY $ ERR = $ THR2-> Errore () ) {Warn ("Errore filetto: $ ERR ");} # Invoca il thread thread nel contesto dell'elenco (implicito) in modo che possa restituire un elenco my ($ TR) = threads-> Crea (Sub {return (QW / ABC /);}); # o specificare contesto di elenco esplicitamente il mio $ Thr = Threads-> Crea ({'Context' => 'Elenco'}, sub {return (QW / ABC /);}); My @Results = $ ThR-> Iscriviti (); $ Thr-> Stach ); # Occupando l'oggetto di un filo $ Thr = Threads-> Self (); $ Thr = Threads-> Oggetto ($ TID); # Ottieni un ID $ $ TID = Threads-> TID (); $ TID = $ TID > TID (); $ TID = "$ Thr"; # Dare altri thread la possibilitą di eseguire discussioni-> rendimento (); rendimento (); # liste di filettature non indipendenti my @threads = Threads-> Elenco (); my $ thread_count = threads-> Elenco (); My @Running = Threads-> Elenco (Discussioni :: Esecuzione); My @joinble = Threads-> Elenco (thread :: Uniscibile); # TEST Thread Objects IF ($ $ THR1 = = $ Thr2) {...} # Gestisci filettatura Thread Stack Size $ Stack_size = Threads-> get_stack_size (); $ old_size = threads-> set_stack_size (32 * 4096); # Crea un filo con un contesto specifico e la dimensione dello stack Thr = Threads-> Crea ({'Context' => 'List', 'Stack_Size' => 32 * 4096, 'exit' => 'thread_only'}, foo); # Ottieni il contesto del thread My $ WantArray = $ Thr-> Wantarray (); # Controlla lo stato del thread se ($ Thr-> is_Running ()) {Sleep (1); } se ($ Thr-> is_joinble ()) {$ thr-> join (); } # Invia un segnale a un thread $ Thr-> Kill ('Sigusr1'); # Uscita un filo filetti-> Esci (); Requisiti: · Perl.


fili Software correlato

Chi siamo