Comment puis-je exécuter et terminer la commande script() linux de Perl?

Question

#!/usr/bin/perl 
$sim = "multiq"; 
`make SCHED=$sim`; 
`script > scripter`; 
`echo hi`; 
print pack("c", 04); 
~ 

Ce script se bloque lorsque le script est appelé. Vous ne savez pas comment faire fonctionner le script Perl.

Answer 1

Notez que les guillemets (‘‘) exécutent une commande et renvoient leur sortie. Si vous allez ignorer la sortie, utilisez system comme dans

system("make SCHED=$sim") == 0 or die "$0: make exited " . ($? >> 8) 

Si vous voulez tirer et oublier un programme (qui est, démarrer en arrière-plan sans se soucier quand il complète), vous pouvez utiliser

system("script >scripter &"); 

Answer 2

Vous devez exécuter ce processus en un seul enfant si vous voulez que tout le monde interagisse. Voir le perlipc pour diverses façons de gérer cela.

Answer 3

vous voudrez peut-être regarder Expect pour contrôler une session interactive

Answer 4

(« « contre-apostrophes) exécuter une commande et retourne son output.So vous pouvez stocker et manipuler davantage. Si vous voulez ignorer la sortie, utilisez system(). Aussi, si vous voulez exécuter un processus en arrière-plan, utilisez & dans le préfixe du processus. Par exemple, vous souhaitez commencer votre script en utilisant Gimp dire simplement

system("gimp &");