Proc :: SafeExec

Utilitaire pratique pour exécuter des commandes externes de différentes manières.
Télécharger maintenant

Proc :: SafeExec Classement & Résumé

Publicité

  • Rating:
  • Licence:
  • Perl Artistic License
  • Prix:
  • FREE
  • Nom de l'éditeur:
  • Leif Pedersen
  • Site Internet de l'éditeur:
  • http://search.cpan.org/~bilbo/

Proc :: SafeExec Mots clés


Proc :: SafeExec La description

Utilité pratique pour exécuter des commandes externes de différentes manières. Proc :: SafeExec est un utilitaire pratique pour exécuter des commandes externes de différentes manières.Synopsis user proc :: SafeExec; My $ Command = nouveau proc :: SafeExec ({# Choisissez une seule d'entre elles. Exec => , # EXEC () après le forking. Fourche => 1, # retour UNDEF dans l'enfant après le forking. # Spécifiez s'il faut capturer chacun. Spécifiez une poignée de fichier Réfer à DUP un # existant un # existant. Spécifiez "Nouveau" pour créer une nouvelle poignée de fichier, "Par défaut" ou UNDEF # pour conserver le descripteur du parent, ou "Fermer" pour le fermer. STDIN => * INPUT_PIPIPE, STDOUT => *PORT_PORT_PIPIPE, STDRR => "Nouveau", # Options diverses. Child_callback => Fref, # Spécifiez une fonction à appeler dans l'enfant après la fourchette (), pour Exemple, pour déposer des privilèges. Debug => 1, # émet une certaine information via des avertissements, tels que la commande à exécuter. No_autowait => 1, # n'appelle pas automatiquement commander-> wait () lorsque $ commande est détruite. real_arg0 => "/ bin / ls", # Spécifiez le fichier réel à exécuter. DANSERT_ARGS => 1, # Diffusez les arguments avant exécu.}); printf "pid de l'enfant est% s ", $ Command-> enfant_pid () Si $ commande-> enfant_pid (); la méthode d'attente attend que l'enfant ne quitte pas ou vérifie si cela est déjà sorti: $ Command-> wait ({# OPTIONNE-HASH d'options. NO_CLOSE => 1, # ne fermez pas "Nouveau" poignées de fichier. NONBLOCK => 1, # N'attendez pas si l'enfant n'a pas été excité (implique no_close).}); Communiquer avec l'enfant: # Perl ne comprend pas <$ command-> stdout ()>. My $ Command_stdout = $ Command- Command-> stdout (); My $ Command_sderr = $ Command_sdr = $ Line = <$ command_sterr>; Imprimer {$ Command-> stdin ()} "Mumble "; Pour vérifier si l'enfant sortit encore: Imprimez" Statut de sortie: ", $ Command-> Exit_status ()," "Si $ commande-> attendez ({nonblock => 1}); attendre que cela sort: $ Commande-> wait (); impression" EXIT_ STATUS: "EXIT_STATUS ()," "; Un outil rapide pratique pour une alternative à $ sortie =` @ exécu`: ($ SORTIE, $?) = Proc :: SafeExec :: Backtick (@Exec); Exigences: · Perl


Proc :: SafeExec Logiciels associés

Set :: Cluster

Distribuez des éléments à travers les nuds de manière équilibrée et montrez des reprises dans des scénarios de défaillance. ...

185

Télécharger