Récupérer une variable de session PHP

**antilook** · 10/07/2009, 13h30

Bonjour,

je suis nouveau venu dans le PERL (donc sur ce forum). Plus habitué au PHP, j'ai besoin d'un coup de main pour une histoire de variable :

j'ai développé un site en PHP mais le paiement sécurisé Citelis nécessite un script Perl chez l'hébergeur (Infomaniak). J'ai donc laborieusement lu et comparé les différences de code entre Perl et PHP. Maintenant, le script Perl fonctionne normalement, il ne me manque plus que la récupération d'une variable de session (SESSION_ID) pour identifier le client dans la base de données.

Code du script Perl de la banque :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
#!/usr/bin/perl 
 
 
#-------------------------------------------------------------
# Topic	  : Exemple PERL traitement de la requête de paiement
# Version : P600
#
# 	Dans cet exemple, on affiche un formulaire HTML
#	de connection à l'internaute.
#
#-------------------------------------------------------------
 
payment_request();
 
sub payment_request
{
 
# affichage du debut de la page
 
 print "Content-Type: text/html\n\n";
 print "";
 print "<HTML><HEAD><TITLE>CITELIS - Paiement Securise sur Internet</TITLE></HEAD>";
 print "<BODY bgcolor=#F4EDC7>";
 print "<Font color=#000000>";
 # print "<center><H1>Choisissez votre carte de cr&eacute;dit</H1></center><br><br>";
 
 # Affectation des paramËtres obligatoires
 
 $parm="merchant_id=0000000000";
 $parm=$parm . " merchant_country=fr";
 $parm=$parm . " amount=100";
 $parm=$parm . " currency_code=978";
 
 # Initialisation du chemin du fichier pathfile (‡ modifier)
 #   ex :
 #    -> Windows : $parm=$parm . " pathfile=c:\\repertoire\\pathfile";
 #    -> Unix    : $parm=$parm . " pathfile=/home/repertoire/pathfile";
 #
 
 	$parm=$parm . " pathfile=/home/www/web/paiement/param/pathfile";
 
 #	Si aucun transaction_id n'est affectée, request en génère
 #	un automatiquement à partir de heure/minutes/secondes
 #	Référez vous au Guide du Programmeur pour
 #	les réserves émises sur cette fonctionnalité
 #
 #	$transaction_id="transaction_id=123456"
 
...

Je dois renseigner la dernière ligne "$transaction_id" avec le contenu de la variable de session crée par la page PHP précédente :

$_SESSION['new_id'] = $new_id;

($new_id étant l'id du dernier enregistrement dans la base)

Mais je ne sais pas comment la récupérer ... depuis le script Perl. J'ai bien parcouru les topics sur le sujet, mais je n'ai pas trouvé de réponses concrètes. Au pire, j'aurais pu récupéré la variable par l'url mais là non plus, je ne comprends pas le mécanisme ... ni pour l'associer à l'url ni pour la récupérer.

Merci par avance de vos conseils, code ou URL pour m'aider à résoudre ce problème.

**Jedai** · 10/07/2009, 15h55

Le CPAN contient un module pour faire le lien entre les sessions de PHP et Perl, PHP::Session.

Au pire il est aisé de faire passer la donnée par l'url... mais je pense que du point de vue sécurité on peut difficilement faire pire !!!

--
Jedaï

**antilook** · 10/07/2009, 16h11

Merci pour cette réponse, je vais regarder du côté des sessions. Je suis d'accord que par l'url, c'est la pire des solutions, je la garde vraiment en dernier recours.

Je laisse le sujet en attente, j'aurais peut-être besoin d'un complément d'aide.

Récupérer une variable de session PHP

Web Perl

Discussions similaires

Partager

Partager