Par exemple, j'ai un script perl p.pl qui écrit "5" sur stdout. Je voudrais affecter cette sortie à une variable comme suit:Comment affecter la sortie d'un programme à une variable dans un script DCL com sur VMS?
$ x = perl p.pl ! not working code
$ ! now x would be 5
La commande PIPE vous permet de faire un pipeline Unix-ish, mais DCL n'est pas bash. Obtenir la sortie assignée à un symbole est difficile. Chaque segment PIPE s'exécute dans un sous-processus séparé (comme Unix) et il n'y a aucun moyen de renvoyer un symbole d'un sous-processus. AFAIK, il n'y a pas d'équivalent bash d'assignation de stdout à une variable.
L'approche typique est d'écrire (redirection) la sortie vers un fichier, puis le relire:
$ PIPE perl p.pl > temp.txt
$ open t temp.txt
$ read t x
$ close t
Une autre approche consiste à attribuer la valeur de retour comme un travail logique qui est partagée par tous les sous-processus. Cela peut être fait comme une doublure en utilisant PIPE:
$ PIPE perl p.pl | DEFINE/JOB RET_VALUE @SYS$PIPE
$ x = f$logical("RET_VALUE")
Depuis le « RET_VALUE » est partagée par tous les processus du travail, vous devez être prudent d'effets secondaires.
Recherchez la commande PIPE. Il vous permet de faire unix comme des choses.
Merci, votre deuxième approche est ce que je cherchais. Quelque chose d'un peu mieux que d'utiliser des fichiers. – Jason