Discussion :

[tazmann]

Bonjour à tous,

Un système de paiement bancaire renvoye le résultat d'un paiement via un script PERL, le problème c'est que toute mon application est écrite en PHP/MySQL.

Ce que je veux faire : :
Appeler un script PHP (Qui va traiter le paiement) en passant les paramètres reçu par PERL soit dans mon cas :
- Le numéro de commande.
- Le code du paiement (OK, Pas OK, interrompu).

Merci d'avance.

[yinyang]

Tu peux peut être appeler ton script perl DANS ta page php qui va traiter ton paiement.

Dans ce cas, il faut revoir un peu l'appel de ta page php pour qu'elle n'attende plus de paramètre, parce que les paramètres seront récupérés à l'intérieur de la page.

[tazmann]

Merci,

Le problème est différent : Imagines que le script PERL est appelé par le serveur de paiement, donc sans intervention de ma part, un peu comme "www.webcron.org" qui lancerait un script de backup ou autre.

Le script PERL travaille donc en "aveugle" la seule chose que je lui demande c'est de lancer un script PHP également en aveugle (Mise à jour base de données et confirmation de la commande via e-mail).

En fait j'aimerai obtenir l'équivalent en PERL du code PHP suivant :

Code :

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

header('Location:http://www.monsite.com/monscript.php?commande=123456789&status=OK");

A bientôt.

[yinyang]

Si ton script PHP n'affiche rien pour l'utilisateur, mais ne réalise que des traitements (Mise à jour base de données et confirmation de la commande via e-mail), tu peux utiliser le module perl LWP pour faire un GET sur ta page PHP.

Quand le script Perl aurait fini, son travail aurat été fait et la page PHP aura été lancé également.

[tazmann]

Merci,

C'est bien cela pas d'affichage juste du "back-office", par contre LWP je ne connais pas, alors si tu as un lien, il serait le bienvenu.

A bientôt.

[yinyang]

La documentation sur le module :

Code :

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

http://search.cpan.org/~gaas/libwww-perl-5.805/lib/LWP.pm

Il te faudra surement installer qq modules supplémentaires pour l'utiliser.

Et un exemple de code :

Code :

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

1
2
3
4
5
use LWP;
use LWP::UserAgent;
 
my $ua = LWP::UserAgent->new;
my $response = $ua->get("http://www.monsite.com/monscript.php?commande=123456789&status=OK");

Bon développement !!

[tazmann]

Cela fonctionne parfaitement, voilà une réponse 100 % utile.

Un GRAND MERCI à yinyang et aux autres.

[NikOoLaaaAAAs]

Bonjour,

j'up ce post car ma questin est en direct lien avec celui ci :

comme tazmann, j'ai monté un système de paiement en ligne (avec sogenactif) qui marche à base de perl.

Mon script perl effectue la transaction et à la fin j'appelle un script php.
Je m'étais servi de ce topic, pour apprendre comment appeler un script php depuis perl, j'ai donc utilisé le module LWP exactement de la facon expliquée par yinyang.

Le système de paiement en ligne marchait très bien jusqu'à hier. Mais maintenant, mon script php n'est plus appelé par le perl, alors que je n'ai absolument RIEN changé au code depuis plus d'un mois (je suis formel !!)

L'utilisation de ce module est-il soumis à des restrictions chez certains hébergeurs ? Je me dis que mon hébergeur a peut-etre changé ces restrictions.

J'ai un serveur mutualisé chez power4website.

Connaissez vous d'autres solutions -simples- pour appeler un script php en perl (il faut que je puisse utiliser les variables $_GET de php, j'ai des variables à passer à mon script, depuis perl) ?? (je ne peux pas utiliser exec, car cette commande est bloquée chez P4W)

Merci de votre réponse !