Appel de perl à partir de php?

Question

J'ai un script php qui gère une entrée de formulaire. Pour des raisons de conception à la fois un peu hors de mon contrôle, et que je ne souhaite pas entièrement changer, je dois appeler un script perl avec les paramètres spécifiés dans le formulaire html.

J'ai assaini toutes les entrées, puis les ai sorties dans un fichier appelé input, qui est lu par le script perl nommé, par souci de brièveté dans cette question, script.pl. Script.pl devrait faire quelques choses et ensuite écrire toutes les sorties dans un fichier nommé output.

J'appelle le script perl de php comme ceci:

system('perl script.pl 2>errors'); 

Pas bon, rien ne se passe. la sortie n'est pas créée, les erreurs ne sont pas créées et l'effet secondaire ne se produit pas.

Mon apache s'exécute en tant qu'ID utilisateur et groupe www-data. Mon répertoire est défini avec 775 paramètres avec la propriété comme moi: www-data. (Mon nom d'utilisateur est remplacé par "moi" pour des raisons d'intimité).

Ma question est double: 1) Est-ce que je fais mal? Si oui, comment devrais-je améliorer le code? 2) Existe-t-il un moyen plus sain de détecter les erreurs dans l'exécution du système?

Après avoir programmé en perl pendant un moment, php se sent comme une douleur dans le cul.

OS: édition serveur Ubuntu

Answer 1

popen peut être utilisé pour obtenir la réponse du shell. c'est votre meilleur pari. Ce qui peut vous aider à déboguer pourquoi le système est en colère. aussi, si votre pl dit "bonjour" et "au revoir", popen peut même lire cela.

Si la commande à exécuter n'a pas pu être trouvée, une ressource valide est renvoyée. Cela peut sembler étrange, mais cela a du sens; il vous permet d'accéder à n'importe quel message d'erreur retourné par le shell

Idéalement, j'aurais pris des données de stdin et écrit sur stdout. popen permettrait un accès net aux deux.

popen('pwd;perl script.pl 2>errors;echo done');

alors vous pouvez voir où étiez-vous (répertoire) lorsque le système se est appelé et l'a fait « fait ».

Answer 2

est-perl dans le chemin? Peut-être avez-vous besoin de le spécifier complètement (par exemple,/usr/bin/perl). System() renvoie false, indiquant un échec? Si vous essayez quelque chose de plus simple, comme system('/usr/bin/true', $retval), est-ce que $retval est réglé sur 1?

Answer 3

Jetez un coup d'œil au PHP system() documentation. Ce qui suit est le prototype de la fonction du système():

string system (string $command [, int &$return_var ]) 

passe dans un 2ème argumentation et ensuite imprimer la chaîne de retour, ainsi que la deuxième variable. Voyez ce que l'erreur dit.

Answer 4

Dans le passé, j'ai utilisé shell_exec() ou les guillemets pour effectuer cela.

La documentation de la valeur de retour de shell_exec indique qu'il est identique à l'opérateur backtick:

Valeurs de retour

La sortie de la commande exécutée.

Espérons que ça aide. System() renvoie uniquement le code d'état.

$var = shell_exec ("ls"); 
print $var; 
$var = `ls -l`; 
print $var;