[PERL] - Code retour commande par system
Bonjour,
J'ai un petit souci avec Perl et surtout le code retour de la commande system.
Voici mon code :
@args=($ENV{"JAVA_HOME"}."/bin/java","-jar",$ENV{"EBICS_CLT_HOME"}."/bin/commandLineTool.jar","--action",$action,"--bank",$bank,"--orderType",$ENV{"OrderTypeBL"},"--fileName",$ENV{"EBICS_CLT_DATA"}."/".$ENV{"RouteFromXfer"});
$cmd=system(@args);
La commande fonctionne mais je souhaite trapper le code retour du programme Java que j'exécute et non le code retour du wait system.
Comment puis je récupérer le code retour du programme java que je lance via la commande system (ou autre)?
Merci d'avance
J'ai un petit souci avec Perl et surtout le code retour de la commande system.
Voici mon code :
@args=($ENV{"JAVA_HOME"}."/bin/java","-jar",$ENV{"EBICS_CLT_HOME"}."/bin/commandLineTool.jar","--action",$action,"--bank",$bank,"--orderType",$ENV{"OrderTypeBL"},"--fileName",$ENV{"EBICS_CLT_DATA"}."/".$ENV{"RouteFromXfer"});
$cmd=system(@args);
La commande fonctionne mais je souhaite trapper le code retour du programme Java que j'exécute et non le code retour du wait system.
Comment puis je récupérer le code retour du programme java que je lance via la commande system (ou autre)?
Merci d'avance
