pb fonction open...

Bonjour,

j'essaie de contourner un pb sur un serveur en safe_mode pour php
la fonction exec() de php est désactivée.
j'ai remplacé mon script php par un script perl avec un open du genre:
open(INFO, $path_bin . " " . $parm . "|");
où $path_bin est le chemin du fichier ("/home/...")
et $parm est les paramètres à passer au fichier exécutable.
le fichier s'ouvre bien sans les paramètres, mais ça plante si je passe les params...
Le fichier à ouvrir est un exécutable qui marche bien et accepte bien sur les paramètres...

Je ne connais pas bien perl, donc je ne sais pas pourquoi ça plante..

Merci de votre aide.

Pourquoi ne pas se contenter de faire un simple :

Code:

---

my $output = `$path_bin $parm`;

---

Faire un pipe comme tu l'as fait a assez peu d'intérêt sauf dans des cas très particulier.

--
Jedaï

Merci pour ta réponse,

Problème: je ne récupère rien dans mon $output...

Le morceau de code original est:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

open(INFO, $path_bin . " " . $parm . "|"); for ($result = 0, $i = 0; <INFO>; $i++) { $result = $result . $_; } close(INFO);   @tableau = split("!",$result); $code = $tableau[1]; $error = $tableau[2]; $message = $tableau[3];

---

donc je devrais récupérer une chaine sous la forme: !code!error!buffer!

Ce code peut-il être remplacé par : my $output = `$path_bin $parm`; ?
Si oui, ca pourrait alors être un pb au niveau de l'exécutable...

Bienvenue à toi renaudjuif.

Peux-tu ajouter les balises codes :tagcode: ?
Cela fait partie des règles de notre beau nouveau forum.

@++

Salut,

Citation:

---

open(INFO, $path_bin . " " . $parm . "|");

---

Pourquoi tu concatènes | avec tout? Tu as essayé?

Code:

---

open(INFO, $path_bin . " " . $parm |);

---

ou

Code:

---

open(INFO, "$path_bin$parm |");

---

lami20j

A priori, avec le code que je t'ai donné, tu devrais récupérer la sortie standard dans $output. Fais un print de cette valeur. Si elle ne contient rien, il y a définitivement un problème avec l'exécutable.
Eventuellement essaie aussi avec :

Code:

---

my $output = `$path_bin $parm 2>&1`;

---

--
Jedaï

:resolu:

Bon, nos pressentiments étaient les bons,
c'est effectivement l'exécutable, fait pour tourner sous linux et incompatible FreeBSD... ma plateforme de test.

Merci de vos réponses, et ce plantage m'aura au moins permis de mettre un pied dans PERL.