Récuperer Variable FLEX depuis script PERL
Bonjour à tous,
Voici mon problème :
Je dois gérer l'upload de gros fichiers via un script Perl.
J'arrive à récupérer mon fichier sauf que je n'arrive pas à récuperer les variables qui sont dans mon URLVARIABLE :
Code:
1
2
3
| var sendVars:URLVariables = new URLVariables();
sendVars.user = "jerome"; |
En gros j'aimerais pouvoir gerer dans mon script Perl ou je vais ajouter mon fichiers, dans quel dossier, cela grace à ma variable user qui la vaut jérôme.
Pour vous donner plus d'info voici un morceau du script Perl (upload.cgi):
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| use CGI; # load the CGI.pm module
my $GET = new CGI; # create a new object
my @VAL = $GET->param; #get all form field names
foreach(@VAL){
$FORM{$_} = $GET->param($_); # put all fields and values in hash
}
my @files;
foreach(keys %FORM){
if($_ =~ /^FILE/){
push(@files, $_); # place the field NAME in an array
}
} |
et j'aimerais pouvoir faire :
Code:
$Destination = "$ENV{DOCUMENT_ROOT}/".$GET->param('user')."/videos/";
Et en gros je n'arrive pas à récuperer ma vaiable user que j'ai fais passé par l'URLVARIABLE coté flex.
Ce qui est bizare c'est que le fichier est bien uploadé mais dans le dossier :
monsiteweb/video or moi je voudrais monsiteweb/monuserici/video
J'ai essayé de definir l'url coté flex comme ceci : mositeweb?user=jerome
mais je n'ai pas reussi à recuperer l'user. Je ne sais plus quoi faire, d'ou mon problème vient-il, coté fex ou coté Perl??
Pour info le script est à la base utilisé pour gerer de l'uplaad php->perl, le voici, vous retrouverez le script upload.cgi dans le dossier :
http://www.perlservices.net/en/download/index.shtml
choisissez le lien PS UPLOAD.
Merci d'avance
