Discussion :

[Shixz]

Bonjour

Je travail sur un projet d'application perl/cgi.
Je test pour l'instant le passage de paramètre (un tableau) d'un script perl à un autre script perl qui est chargé de me créer une page html.
Mon problème étant la récupération des valeurs du tableau (pour le passage d'un simple paramètre aucun souci) dans le 2ème script perl.

Pour le moment, rien ne s'affiche avec ce code

Voici le premier script perl (celui passant le tableau en paramètre vers le deuxième script) :

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
 
#!/usr/bin/perl -w
 
use warnings;
use CGI;
 
my($cgi) = new CGI;
print "Content-type: text/html\n\n";
 
my($prenom) = $cgi->param("prenom");
 
@hello=("toto","titi","tutu");
 
my $URL="http://linux.isi.u-psud.fr/~kleber/cgi-bin/resultat.pl?res=$hello";
#exec ($URL);
 
print "<META http-equiv=\"REFRESH\" content=\"0; url=$URL\">";

Et voici le second script perl (celui censé récupérer et affiché les valeurs du tableau :

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
 
#!/usr/bin/perl -w
 
use warnings;
use CGI;
 
#my($cgi) = new CGI;
$q = new CGI;
 
print $q->header;
print $q->start_html("Resultat");
print "Rentrez votre prenom : <BR>";
print $q ->start_form(-method=>"get", -action=>"script.pl");
print $q->textfield(-name=>"prenom", -size=>20,-maxlength=>50);
print $q->submit();
print $q ->endform;
 
@var= $q->param("res");
foreach $valeurs (@var){
	print $valeurs."\n";
}
 
print $q->end_html;

Si vous avez la moindre idée, je vous remercie.

[bobspike]

j'ai moi aussi des problèmes à ce niveaux impossible de recuperer un tableau de chaines de caractéres d'un script à l'autre.

[thierry.chich]

Je ne suis pas un expert dans ce domaine, mais ca me semble assez logique que vous ne puissiez pas passer votre tableau de cette manière.
D'une manière très générale, votre problème est un problème de sérialisation il me semble. Il y a des modules en perl pour faire ça, dont la fonction est de transformer une variable d'un type quelconque en quelque chose qu'on peut passer dans POST.
Pour les tableaux en particulier, peut-être y a t-il quelque chose de plus simple, mais ça, je ne peux pas dire...