Comment retourner une variable Perl à un script ksh?

Question

J'ai un script ksh qui appelle un programme Perl. Le programme Perl crée des données importantes sur lesquelles le script ksh doit agir. Exemple:

Mon programme ksh:

#!/usr/bin/ksh 
abc.pl > $logFile 
# perl pgm creates variable $importantData See below. 
# HOW DO I GET THE .KSH SCRIPT TO SEE $importantData ??? 
def.ksh $importantData # send important data to another .ksh script 
exit 

programme Perl My:

$importantData = somefunction(); 
exit; 

Answer 1

ne pouvait pas vous avez juste l'impression de script perl les données, puis envoyer les données à la nouvelle ksh script

#perl script 
print someFunction(); 

#ksh script 
perl abc.pl | ksh scrip 

Answer 2

Le programme Perl doit imprimer la variable. Le script KSH capture la sortie.

Perl ...

$importantData = somefunction(); 
print $importantData; 
exit 

KSH ...

#!/usr/bin/ksh 
abc.pl > $logFile 
importantData=$(perlprogram) 
def.ksh $importantData # send important data to another .ksh script 
exit 

Answer 3

Si vous ne pouvez pas utiliser la sortie standard ou erreur standard pour fournir $ ASPECT, vous pouvez utiliser un fichier temporaire.

Answer 4

Si la valeur est numérique, vous pouvez la renvoyer à l'aide de la fonction exit() de Perl, qui apparaîtra comme le code d'état de Perl. Par exemple, exit(3) provoquera Perl à renvoyer la valeur 3 à ksh. Par exemple, exit(3) Pour autant que je sache, vous pouvez utiliser la variable spéciale $? de ksh pour lire le statut de sortie de la dernière commande. Voir here pour plus de détails.

Answer 5

Sur les systèmes * nix, un processus enfant ne peut pas modifier l'environnement de son parent. Si vous concevez votre script perl pour imprimer les données importantes en standard, vous aurez plusieurs façons de les capturer pour un traitement ultérieur.

Le plus simple est de rediriger la sortie vers un fichier pour un traitement ultérieur:

perlprogram > saved.output 

Si vous avez seulement besoin des données pour un processus, et ce processus est la prochaine chose à faire, vous pouvez diriger le perl sortie à l'entrée de l'autre processus:

perlprogram | otherprogram 

Vous pouvez également enregistrer la sortie dans une variable d'environnement (notez le script parent fait l'économie et non l'enfant):

envvariable=$(perlprogram) 

ou vieille école (qui a cité des problèmes avec des commandes complexes):

envvariable=`perlprogram`