Discussion :

[tazmann]

Bonjour ... bonsoir, bonne nuit ... je ne sais plus ... ,

Je dois appeler un script en PHP depuis un script PERL en passant un paramètre.

Quelqu'un a-t-il une idée ou peut-être qu'il y a une documentation quelque part ?

Contexte :
Un logiciel de paiement en ligne appelle un script PERL pour me retourner le résultat du paiement ... et je dois continuer le traitement en PHP en fonction du code reçu. Le tout se passe sur un serveur Apache sous Linux.

Merci d'avance et à bientôt.

[2Eurocents]

Hello, ( ça passe à toute heure )

Bonjour ... bonsoir, bonne nuit ... je ne sais plus ... ,

Je dois appeler un script en PHP depuis un script PERL en passant un paramètre.

Quelqu'un a-t-il une idée ou peut-être qu'il y a une documentation quelque part ?

Contexte :
Un logiciel de paiement en ligne appelle un script PERL pour me retourner le résultat du paiement ... et je dois continuer le traitement en PHP en fonction du code reçu. Le tout se passe sur un serveur Apache sous Linux.

Comme d'habitude, en Perl, tu as plusieurs possibilités ...

Il s'agit, ni plus ni moins, d'un appel à un processus externe à ton script Perl.

Tu as, dans ce cas, 3 grandes familles de lancement :

- La fonction "system" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

system "ma_commande mes_paramettres";

- Les backquotes :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$mon_resultat = `ma_commande mes_parametres`;

- Le traitement "file-like" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

open SORTIE, "ma_commande mes_parametres|"; $mon_resultat = <SORTIE>; close SORTIE;

Bien sûr, à toi de voir si tu veux réellement récupérer la sortie du processus appelé ... C'est peut être préférable, pour toi, si tu souhaite poursuivre son affichage et terminer ta page en CGI/Perl.

Par contre, dans le cas ou tu n'as rien de plus à faire en Perl après l'appel à PHP et si c'est ce dernier qui se charge de la suite de l'affichage, tu as aussi la solution de substituer le processus PHP au Perl en cours :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
exec "ma_commande mes_parametres";
die "Je n'ai pas réussi à lancer le script PHP"

Ainsi, le contrôle passe directement de Perl à la commande passée (invocation du script PHP), pour ne revenir à Perl qu'en cas d'impossibilité de lancer la commande (d'où le message d'erreur invoqué avec die).

Bonne continuation.

[tazmann]

Merci,

C'est bien la dernière solution qui m'intéresse car lors d'un paiement une réponse "muete (sans affichage)" est envoyée via le processus PERL.

Ceci de manière à éviter que la suite du traitement ne dépende pas de l'utilisateur dès lors que le paiement est valide.

En effet celui-ci peut perdre sa connexion ou alors décider de ne pas continuer le processus quand bien même il a payé.

Pour rester dans le concret, si mon sript s'appelle : after_payement.php (qui va mettre un flag "payement OK" dans une BD) il faut donc faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
exec "after_payment.php?CODE=$CODE"; 
die "Script PHP after_payment.php pas lancé";

[2Eurocents]

Si la solution te convient, n'oublie pas alors de placer le tag [résolu] sur ton sujet en utilisant le bouton, en bas à gauche de l'interface quand tu visualises le fil de discussion en étant connecté.

Merci et bon courage.

[tazmann]

oups ... j'ai appuyé sur "envoyer" un peu trop tôt

Cependant j'ai un doute, comment le serveur va-t-il savoir que c'est un script php.
Je pense qu'il faudrait lancer la ligne de commande PHP, le problème c'est que je n'ai jamais pratiqué l'exercice, il doit aussi y avoir quelque chose sur la manière de transmettres les paramètres, alors je pensais à quelque chose comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
exec "php -f after_payment.php CODE=$CODE"; 
die "Script PHP after_payment.php pas lancé";

Est-ce que cela est correct ?

Merci d'avance

[2Eurocents]

oups ... j'ai appuyé sur "envoyer" un peu trop tôt

Ce n'est pas un problème

Cependant j'ai un doute, comment le serveur va-t-il savoir que c'est un script php.
Je pense qu'il faudrait lancer la ligne de commande PHP, le problème c'est que je n'ai jamais pratiqué l'exercice, il doit aussi y avoir quelque chose sur la manière de transmettres les paramètres, alors je pensais à quelque chose comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
exec "php -f after_payment.php CODE=$CODE"; 
die "Script PHP after_payment.php pas lancé";

Est-ce que cela est correct ?

Merci d'avance

Le serveur ne sait pas forcément grand chose, hélas ... et aussi, il faut que tu disposes de droits d'exécution de commandes, dessus.

Cet obstacle levé, si j'en crois :

Usage: php [options] [-f] <file> [args...]
php [options] -r <code> [args...]
php [options] [-- args...]
-s Display colour syntax highlighted source.
-w Display source with stripped comments and whitespace.
-f <file> Parse <file>.
-v Version number
-c <path>|<file> Look for php.ini file in this directory
-a Run interactively
-d foo[=bar] Define INI entry foo with value 'bar'
-e Generate extended information for debugger/profiler
-z <file> Load Zend extension <file>.
-l Syntax check only (lint)
-m Show compiled in modules
-i PHP information
-r <code> Run PHP <code> without using script tags <?..?>
-h This help

args... Arguments passed to script. Use -- args when first argument
starts with - or script is read from stdin

et ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
exec "php -f after_payment.php CODE=$CODE"; 
die "Script PHP after_payment.php pas lancé";

Pour le "-f after_payment.php", c'est sans problème.

Après, pour le traitement du "CODE=valeur", il faut voir comment PHP s'en tire avec les paramètres de script, mais ce n'est plus du Perl .

En tout état de cause, avec une telle mécanique, il n'est plus possible de bénéficier du passage de paramètres au PHP avec les méthodes GET ou POST. Il faut tout traiter en options du script PHP ...

Bonne continuation.

[tazmann]

Merci pour cette aide efficace et circonstanciée.

Bonne continuation.